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Preface 



This manual is the second in a series of two volumes. The reference 
information combined in these two manuals is provided as a DOS/VS 
serviceability aid and is, therefore, a summary of other DOS/VS 
documentation. These manuals are intended for use by persons 
involved in program support. 

The two volumes contain the following information: 

- Volume I.SY33-8571: • 

Chapter I : System/370 General Information 

II: DOS/VS General Information -. \ 

III: DOS/VS IOCS (General, SAM, DAM, ISAM) 

IV: DOS/VS Supervisor Control Blocks and Areas 

V : DOS/VS Service Aids 

- Volume 2, SY33-8572: 
Chapter I : POWER/VS 

II : VTAM Control Blocks 

III: VSAM Control Blocks 

IV: Model 20 Emulator 

V : 14xx Emulator 
VI: BTAM 

If there is any discrepancy between the information contained in this 
manual and the DOS/VS optional programming material (e.g., PLMs 
and listings), the latter is assumed to be correct. 



Second Edition (March, 1975) 

This is a major revision of, and obsoletes, SY33-8572-0. It applies to 
Version 5, Release 31, of the IBM Disk Operating System/ Virtual 
Storage, DOS/VS, and to all subsequent versions and releases until 
otherwise indicated in new editions or Technical Newsletters. Changes 
are continually made to the information herein; before using this 
publication in connection with the operation of IBM systems, consult 
the latest Virtual Storage Supplement (to the IBM System/360 and 
System/370 Bibliography), GC20-0001, for the editions that are 
applicable and current. 

Requests for copies of IBM publications should be made to your IBM 
representative or to the IBM branch office serving your locality. 

A handbook-sized binder, FE Part Number 453559, may be purchased 
from IBM. Customers may order it through their IBM marketing 
representative. IBM personnel should order it as an FE part from 
Mechanicsburg. 

This manual has been prepared by WT-DP/CE Technical Operations, 
Dept. 265, P.O. Box 24, Uithoorn, The Netherlands. 

A form for readers' comments is provided at the back of this 
publication. If the form has been removed, comments may be sent 
to the above address. Comments become the property of IBM. 

© Copyright International Business Machines Corporation, 1974,1975 
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CHAPTER I 
POWER/VS 




) PROGRAMMING REQUIREMENTS FOR POWER/VS 



Prograt 



fling requirements 







1 




1 




1 










During generation 




The following 




Number of entries 




I/O Files 




of the DOS/VS 




phases must be 




in the LUB table 






■> 


supervisor 




cataloged in the 




belonging to the 




The Queue file and 


J 


POWER = YES 




CIL 




POWER/VS 




Data file must be 




in SPVR macro 








partition must 




assigned to a 




forces: 




IPWSSH 




be large enough 




spooling device. 




o PHO =YES 




IPW$$I2 




to accommodate 




Queue file SYS001 




PFIX =YES 




IPW$SNU 




all reader and 




Datafile(s) thru 




• ECPREAL = YES 




IPWSSCP 




writer tasks that 




SYS006 




and if 




IPWSSGD 




may be running 




as required. 


\ 


N PARTS = 1 




IPWSSPD 




concurrently. 




Queue file and 


J 


or is not 




IPWSSAQ 




Programmer LUBs 




Data file extents 




specified, 




IPW$$RQ 




SYS000 thru 




must be defined on 




« N PARTS = 3 




IPW$$NQ 

IPW$$DQ 

IPW$$FQ 

IPW$$PR 

IPWSSLR 

IPWSSPL 




SYS006 are 
reserved for the 
account, queue 
and data files. 




the SYSRES label 
information cylinder 


























IPWSSLW 












IPWSSPP 












IPW$$XR 












ipwssxw 












IPW$$XJ 












IPWSSTR 












IPW$$LU 












IPV/SSPS 












IPWSSSL 












IPWSSIC 












ipwsssc 












IPWSSER 












IPWSSOE 








j 




SSBPOWIN 








/ 




and the macro 












POWER must be 












cataloged in 












the SSL 












1 








1 









for POWER/VS RJE 
(optional) 



X 



The phases 
IPWSSTM and 
IPWSSMS must alsc 
be cataloged in 
the CIL and the 
macros PLINE and 
PRMT must be 
cataloged in SSL 



_n 



for POWER/VS Accounting 
(optional) 



The following 
phases must also 
be cataloged in 
the CIL 

ipwsspa 

IPWSSGA 
IPWSSSA 



m 



~T~ 



JA=YESornl, 
n2,n3,n4,n5 
must be specified 
in the FOPT macro 
during generation 
of the DOS/VS 
supervisor 



ZL_ 



An account file 
must be assigned to 
SYS00O, a spooling 
device. Account 
file extents must be 
defined on the 
SYSRES label informa 
tion cylinder 



RELATIONSHIP BETWEEN A QUEUE SET, QUEUE RECORDS, AND A QUEUE ENTRY 



queue record 



L 



queue record I— 



queue record 



queue record 



_ J 

a Queue Entry 



— m track group 
-« track group 



— « track group 
— *| track group 



Queue file 
SYS001 



Data file 
SYS002 



FREE QUEUE SET 







© 



® 



master record — J queue record J queue record d queue record 



(7) MRQF field in master record 
(2/QRNS field in queue record (zero=last) 



CLASS CHAIN AND QUEUE SET 



class table 
in DMB 



2 



-» first-in-set queue record 
1 ? ~" 



first-in-set queue record 
t st — 



next-in-set queue record 



-fh 



Sh- 



last-in-set queue record 



J 



first-in-set queue record 



1 CTQF field in class table entry 

2 CTQL field in class table entry (zero means last in chain) 

3 QRQN field in queue record 

4 QRQP field in queue record 

5 QRNS field in queue record (zero means last in chain) 






INTERFACES AND TASK STRUCTURES 



©~L 



DOS/VS SUPERVISOR 



SVCO 
APPENDAGE 

Posts appropriate 

execution 

processor task 

and sets 

POWER/VS 

partition 

dispatc'nable 



© 



exec. RDR task 
exec. LST task 
exec. PUN task 



HOT READER 
APPENDAGE 



Locates appropriate 
reader task and 
posts it 
dispatchable 



© 



PAGE FAULT 
APPENDAGE 



Pre-processor 



Changes next 
sequential 
instruction in PSW 
to task manage- 
ment to select 
another task 
during processing 
of the page fault. 
Queues page 
fail Its before 
returning to page 
manager 



Post-processor 



Posts appropriate 
task dispatchable 
and sets POWER/VS 
dispatchable. 
Returns next page 
fault in queue to 
page manager 



ATT. INTERFACE 
APPENDAGE 



Verifies and passes 

potential 

POWER/VS 

command; posts 

command 

processor task 

dispatchable. 



J 



SVC 90/91 
APPENDAGE 



Passes DOS/VS 
and user job 
accounting 
information to 
execution account 
record area} posts 
execution reader 
task dispatchable 



IPW$$NU 

task management 



Scans for TCB of 
task with highest 
priority ready to 
run and dispatches 
it. 



¥ 



® 



RJE CHANNEL END 
APPENDAGE 



Queues BCA in 
BCA chain and 
posts line manager 
task dispatchable 



exec. RDR task 



V 

RJE line 
manager task 



5> 



1* J * From any task issuing 
POWER/VS wait or 
detach 



task dispatchable 



■® 



© 



•^ any task (at post-processor) or 
'" task management (at pre-processor) 



INTERFACES AND TASK STRUCTURES 



(....Cont'd) ' 



£ 



LOCAL READER TASK 



IPWSSPR or IPWSSER 



Reads cards into physicc 
data area (PDA) and 
links to logical reader. 



IPWSSLR 



tes data records to 
data file from logical 
data area (LDA) and 
creates queue entry 
by means of function 
routines. 



Functions used by 
IPWSSPR, IPWSSER and 
IPWSSLR 

RQ,AQ,PD,DQ,FQ, 
PA,LU,SC,OE 



Services used 
TM / RM,SM,Av\S,DS / TIS 



RJE READER TASK 



IPWSSTM 



Reads cards from fermina 
device (using RTAM 
routines) and links to 
logical reader. 



IPWSSLR 



Writes data records to 
data file from logical 
data area (LDA) and 
creates queue entry 
by means of function 
routines. 



Functions used by 
IPWSSTM and IPWSSLR 



RQ,AQ,PD,DQ,FQ, 
PA,LU,SC,IC,MS 



Services used 
TM,RM,SM,MS,DS,TIS 



EXECUTION READER 
TASK 



IPWSSXR 



Emulates reader I/O 
requests from user 
program into read 
operations from data 
file. 

Invokes execution 
list/punch writer task 
whenever list or 
punch I/O request 
to be emulated. 



Functions used by 
IPWSSXR 



GD,NQ,DQ,FQ,PA, 
XJ,SL 



Services used 
TM,RM,SM,MS,DS,VS 



EXECUTION LIST TASK 



IPWSSXW 



Emulates list I/O 
requests from user 
program into write 
operations to data file 
and creates a queue 
entry by means of 
function routines. 



Functions used by 
IPWSSXW 



RQ,AQ,PD 



EXECUTION PUNCH 
TASK 



IPWSSXW 



Emulates punch I/O 
requests from user 
program into write 
operations to data file 
and creates a queue 
entry by means of 
function routines. 



Functions used by 
IPWSSXW 



~$) 



~$ 



S 



~$ 



^ 



TM # RM,SM,AAS,DS < K 



INTERFACES AND TASK STRUCTURES 



(....Cont'd) 



1 



LOCAL LIST TASK 



IFWSSPL 



LOCAL PUNCH TASK RJE LIST TASK 



IPWSSPP 



IPWSSTM 



RJE PUNCH TASK 



IPWSSTM 



COMMAND 
PROCESSOR TASK 



IPWSSCP 



^ 



Links to logical writer 
and prints lines from 
physical data area 
(PDA) 



Links to logical writer 
and punches cards from 
physical data area 
(PDA) 



Links to logical writer 
and prints lines at 
terminal using RTAM 
routines 



Links to logical writer 
and punches cards at 
terminal using RTAM 
routines 



IPW$$LW 



Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



JPWSSLW 

Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



IPWSSLW 



IPWSSLW 



Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



Builds and attaches 
tasks into task selection 
list, initiates termination 
of tasks, or changes 
status queue entries 
according to command 
received 



Functions used by 
IPWSSPL and IPWSSLW 



Functions used by 
IPWSSPP and IPWSSLW 



Functions used by 
IPWSSTM and IPWSSLW 



Functions used by 
IPWSSTM and IPWSSLW 



Functions used by 
IPWSSCP 



NQ,DQ,FQ,PA,LU 



NQ,DQ,FQ,PA,LU 



NQ,DQ,FQ,PA,LU, 
MS,IC 



NQ,DQ,FQ,PA,LU, 
MS,IC 



AQ,DQ,FQ,LU 



Services used 
TM,RM,SM,MS,DS, 



Services used 
TM^M^M^S^S, 



Services used 
TM,RM,SM,MS,DS, 



Services used 
TM,RM,SM,MS,DS 



TM,RM,SM,MS,DS, 
TS/TIS 



^ 



W 



^ 



^ 



^ 



INTERFACES AND TASK STRUCTURES 



£ 



SAVE ACCOUNT TASK 



IPWSSSA 



IFWSSPS 



INITIATOR 
TERMINATOR TASK 



IPWSSI2 

Loads nucleus and all 
required modules into 
partition at initiation 

j. Opens POWER/VS 
files and links to logical 
reader and writer for 
autostart. Then waits for 
request as terminator. 
Closes POWER/VS files 
and restores partition 
for normal DOS/VS 
operation. 



TASK TERMINATOR 
TASK 



IPWSSTR 



RJE LINE 
MANAGER TASK 



IPW$$TM _ 

Initiates and terminates 
lines, processes sign 
on/off, recovers from 
line errors, interfaces 
with RTAM routines. 



Reads account file 
using a function routine 
and writes the account 
records to disk, tape or 
punch device, or deletes 
the file, or links to 
logical reader to spool 
cards to be punched 



Reads queue file 
records using function 
routines and prints 
queue status informa- 
tion on a printer 
device. 



IPWSSLR 



Writes records to 
data file and 
creates queue entry 
using function 
routines 



Handles PSTOP from 
logical reader/writer 
tasks and I/O error or 
WLR error conditions 
On error conditions, 
files are restored to 
their possible status. 
Task uses TCB of task to 
be terminated or to be 
recovered from I/O 
error. 



IPWSSLR, I FWSSLW 
Process autostart 



Functions used by 
IPW$$SA 



Functions used by 
IPWSSPS 



Functions used by 
IPWSSI2 



Functions used by 
IPWSSTR 



Functions used by 
IPWSSTM 



LU,MS 



PA,GA,IC,LU 



AQ,DQ,FQ,PD, 
PA,GA,LU 



Services used 
TM / RM,SM,MS / DS,TS 



Services used 
TM,SM,MS 



TM,RM,SM,MS,DS 



W 



TM,SM,MS,DS 



W 



TM,SM,MS / DS,TIS 



W 



w 



w 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) 



POWER/ VS operator commands include : 

o Task Management commands. Used to control read/ write tasks 

and execution processors. 

o Queue Management commands. Used to control the various 

input/output queues. 

o Miscellaneous commands. Enable the operator ro, for example, 

align printer forms or save the POWER/VS account file. 

The operator commands consist of two fields, the operation field and the 
operand field. The operand field contains one or more parameters, separated 
by commas, or contains no parameters at all. The operator commands can be. 
entered in either uppercase or lowercase. 

POWER/VS supports abbreviated as well as extended operation codes. All 
command options (parameters) are valid for both formats. 

The following table shows the abbreviated and the extended command codes r 



Type 


Extended 


Abbreviated 


Function 




format 


format 




Task 


PSTART 


S 


start a task or partition 


management 


PSTOP 


P 


stop a task or partition 




PGO 


G 


activate a task or partition 




PEND* 


- 


end POWER/VS execution' 




PCANCEL 


C 


cancel a POWER/VS status report 




PFLUSH 


F 


flush an active job entry 




PRESTART 


T 


restart a write task 


Queue 


PDISPLAY 


D 


display a job status 


management 


PALTER 


A 


alter attributes 




PDELETE 


L 


delete a job entry or a message 




PRE LEASE 


R 


release a job entry 


Miscellaneous 


PBRDCST 


B 


transmit a message 




PINQUIRE 


1 


check terminal status 




PACCOUNT 


J 


process account file 




PSETUP 


- 


print page layout 



The one-character operation code for PEND, (E) is not supported, since 
the operator might inadvertently end the execution of POWEiyVS. 



1-08 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) (...Continued) 



Task Management commands 



Operation 


Operand 


Comments 


JpstartI 


task, uraddr, [class] 


task : RDR, LST or PUN 


S 


I task, uraddr, tapeaddr 1 
J partition [, class] | 


uraddr : Its format is either : 


I J 


cuu or X'cuu'. 


(non -diskette) 


RJE, lineaddr L password] 


lineaddr : Its format is either : 




cuu or X'cuu 1 . 






tapeaddr : Its format is : 






X'cuu 1 . 


f 1 




password: Any combination of 


JpstartI 


RDR,uraddrl,class2, 


up to eight alpha- 


i s / 


uraddr 2 


numeric characters, 
class : The meaning of this 


(diskette 




parameter depends on 


data-mode 




the type of task to be 


processing) 




started. 

For a write task, "class" 


JpstartI 


RDR, uraddr 2 H class] 


defines the output 


I s / 


[file-id] 


class(es) upon which 
the task operates. Up 


(diskette 
sysin-mode 


r l i 


to four classes can be 
designated by specifying 


, number-of -diskettes 


processing) 


COM 


one to four alphabetic 




characters from A 






through Z. The order 






specified is the order in 






which the classes will 






be processed. If no class 






parameter is specified, 






only class A is selected. 






For a read task, "class" 






defines the input class 






that is assigned to all 






jobs without a class 






specification in their 






* SS JOB cards, when 






no CTL statement is in 






effect. It may be 






specified as an alpha- 






meric character from 






A through Z or from 






through 4. If no class 






parameter is specified, 






class defaults to A. 



POWER/ VS OPERATOR COMMAND LANGUAGE (POCL) (. . .Continued) 



Task Management commqnds ( . . . continued) 



Operatic 



Operand 



PSTART, 
S (c'ntd) 



class : For a partition, "class" 
(c'ntd) defines the input 

class(es) that can be 
executed in this 
partition. Up to four 
classes can be designa- 
ted by specifying one 
to four alphameric 
characters from A 
through Z or from 
through 4. The order 
specified is the order 
in which the classes 
will be executed. If 
no class is specified, 
only job entries with 
matching partition- 
type (0-4) input class 
are selected 



partition 
uraddr 1 



BG, F4, F3, F2 
orFl. 

physical device 
address of cardreader 
in form X'cuu' or cuu 
uraddr 2: physical device 
address of 3540 
diskette in form 
X'cuu' or cuu. 
file-id : File name as in HDR 1 
label of the diskette. 
Can be specified with 
or without quotes. 
Blank characters pre 
only allowed when 
filename specified 
within quotes, 
number-of -diskettes : 

Can be one to three 
digits, allowed 
values from 1 to 255 
S : Volume sequence checking 
Sequence numbers must start 
with 1 and be incremented 
by 1 . When omitted, no 
checking will take place. 
V: File verification. When 
omitted, verify field in 
HDR1 label is ignored. 



POVVER/VS OPERATOR COMMAND LANGUAGE (POCL) (. . .Continued) 



Task Management commands (...Continued) 



Operation 


Operand 


Comments 


JPSTOPJ 


uraddr LEOJ 1] 
J |_, RESTART] 1 

partition j 
1 llneaddr [>EOj] 


uraddr : Format is : 

cuu or X'cuu'. 

RESTART: Applies only to 

output processing. 

partition : BG, F4, F3, F2 
orFl. 

lineaddr : Its format is either: 
cuu or X'cuu'. 


fci 


J uraddr 1 
1 partition, cuu | 


uraddr : Its format is either 
cuu or X'cuu' 

partition, cuu : specifies the 
partition and 
unit record 
device address 
whose output 
is being 
spooled to tape. 


PEND 


uraddr | 
KILL £ uraddr] 


uraddr : Its format is either 
cuu or X'cuu'. 

KILL: Terminates POWER/VS 
immediately. Partitions 
supported by POWER/VS 
are also cancelled. 


/pcancelI 


[status] 


STATUS : A confirmation 

message is issued. 


JpflushI 


(uraddr [,HOLD] 1 
^partition [HOLD]f 


uraddr : Its format is either 
cuu or X'cuu'. 

HOLD : specifies that the 

corresponding job entry 
is not to be deleted, 
but put in the hold 
state. 

partition : BG, F4, F3, F2, 
orFl. 


[prestartI 


uraddr [,n~] 


uraddr : Its format is either 
cuu or X'cuu' 

n : signed or unsigned 

value from to 9999. 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) (. . .Continued) 



Queue Management commands 



Operand 



{p ALTER J 



queue, jobname |, jobnumber] 
I ALL | 

| *abc I 

[ class 1 

QPRI = priority] 

[,DISP = disposition] 

C,CLASS = class2] 

fj, COPY = number of copies] 

I, REMOTE =remid] 



queue : LST, PUN or RDR 
jobname : can be 2 to 8 

characters 
jobnumber : may be 1 to 5 

digits long. 
*abc : requests to alter all job 
entries that have the 
first n characters of 
their jcbnames in 

represents any 
combination of from 
one to seven 
alphameric characters, 
class 1: specifies class of job 
entries to be altered. 
Can be any alphabetic 
charcater (A-Z) and for 
input classes also from 
0-4. 
priority : A single digit from 
to 9. Nine is the 
highest priority, 
disposition: can be H,K, L or D. 
class 2: any alphabetic character 
(A-Z). Also, specification: 
from through 4 are 
allowed for input classes, 
number of copies : can be from 

to 99. 
remid : can be specified as any 
number from to 200. 
'0' indicates the central 
location. 



JpdeleteI 



[ queue, jobnam 
queue, ALL 
queue, class 
queue, *abc 

[ MSG [,n] 



|, jobnumberjj 



queue : LST, PUN or RDR. 
jobname :Can be 2 to 8 alphameric 

characters, 
jobnumber : Can be 1 to 5 digits 
long 
All job entries with the 
same first n charcater, 
are to be deleted, "abc" 
represents any combination 
of up to seven alphameric 
characters. 
i : ALL USERS-type 
message number n is 
to be deleted, 



*abc : 



MSG, 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) (.. .Continued) 



Queue Management commands (continued) 



Operation 


Operand 


Comments 


/pdisplayI 




queue, jobname f, jobnumber] 


queue : LST, PUN or RDR 


l D J 




queue QALL] 


jobname : Can be 2 to 8 






queue, HOLD 


■ characters'. 






queue, FREE 


jobnumber : Can be 2 to 5 






queue, RJE (_,remidj 


digits 






queue, LOCAL 


ALL : If queue parameter is 






queue, *abc 


not specified, status 






queue, class 


information on all 




, 


ALL [Jistaddr] 


entries in all queues 






HOLD 


is displayed on SYS LOG. 






FREE 


listaddr : Its format is : 






RJE fremid] 


cuu or X'cuu'. 






LOCAL 


class : Can be specified as a 






*abc 


character from A through 






MSG 


Z or from to 4 (input 






A 


class only). 






M 


*abc : specifies a request for the 






Q 


status of all job entries 
having the first n 






characters of their job- 






names in common. "abc" 






represents any combina- 






tion of from one to seven 






alphameric characters. 






If the queue parameter 






is not specified, status 






information is displayed 






for all queues. 


/prelease! 


I queue, jobname [, jobnumber] 
1 queue C,ALL]] 


queue : LST, PUN or RDR. 


i R J 


jobname : Can be 2 to 8 


* J 


| queue, class 


alphameric 




queue, *abc 


characters. 

jobnumber : Can be 1 to 5 
digits long. 

*abc : all job entries with the 
same first n characters 
are to be released, 
"abc" represents any 
combination of up to 
seven alphameric 
characters. 
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Miscellaneous commands 



Operation 


Operand 


Comments 


JpinquireI 


J lineaddrl 

{all } 


lineaddr : Its format is : 
cuu or X'cuu' 
ALL : Status of all supported 

lines are to be 

displayed 


J pbrdcst] 


rem id, 'text 1 


rem id : Can be from 1 to 

200. A specification 
of ALL USERS 
indicates all users. 

'text': Can be 1 to 40 
characters. 


JpaccountI 




tapeaddr £ f i lenamej 
DISK, filename 
DEL 




If no operands specified, the 
account file is spooled to disk, 
tapeaddr : Can be : 

cuu 

X'cuu' 

cuu,ss 

X'cuu 'ss 

cuu'X'ss 

X'cuu', X'ss' 
filename : If specified, the file 

created will be a 

standard labeled tape 

file. May be 1 to 8 

alphameric characters 

long. 
DISK, filename : "filename" is 
1 to 8 alpha- 
meric 
characters long 


PSETUP 


uraddr I - , n 1 


uraddr : Its format is : 
cuu or X'cuu' 

n : one or two digits that 
specify the number of 
pages to be printed. 
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There are four types of commands : 

* Terminal control commands. Start and stop user sessions. 

* Task management commands. Apply to RJE write tasks. (The RJE read 
task is started by the central operator when he brings up the line, and 
its operation is controlled by the system, as are execution processors.) 

* Queue management commands. Apply to jobs that are submitted by 
or routed to the same remote-id as the one issuing the command. 

* Miscellaneous commands. Print page layouts or transmit messages. 
The following table includes all valid commands. 



Type 


Command 


Function 


Terminal 


* .. SIGNON 


start a user session 


control 


* .. SIGNOFF 


terminate a user session 


Task 


* . . START 


start a writer or start message 


management 




generation 




* . . STOP 


stop a writer or stop message 
generation 




* .. GO 


re-activate a write task 




* .. FLUSH 


flush an activate job entry 




* . . RESTART 


restart a writer 


Queue 


* .. DISPLAY 


display a job status 


management 


* . . ALTER 


alter job attributes 




* .. DELETE 


delete a job or a message 




* .. RELEASE 


release a job 


Miscellaneous 


* . . BRDCST 


transmit a message 




* . . SETUP 


print page layout 



POWER/VS RJE terminal commands are entered on punched cards through the 
reader at the terminal. They must be submitted outside POWER/VS job boundaries, 
otherwise they are treated as user data. 

Each RJE command consists of the following fields : 

1. Identification field. Contains an * in column 1, blank in column 2, and 
. . (periods) in columns 3 and 4. Column 5 must be blank. 

2. Operation field. Specifies the RJE command. At least one blank must 
separate this field from the following field. 

3. Operand field. Contains one or more parameters, separated by commas. 
At least one blank must separate the operand field and the comments 
field. 
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Comments field. May contain any information considered helpful by the 
user. Continuation of the comments field is not allowed. 

The operation field, operand field, and comments field must be contained 
in columns 6 through 71 . Column 72 must be blank. 

Sequence field. Sequence numbers are useful when a number of commands 
with the same operation code are submitted from a terminal. Columns 
73 - 80 are returned in diagnostic messages. 



Terminal commands 



Operation 


Operand 


Comments 


* . . SIGNON 


remid [, password Tuser information^ 


remid : Remote users are 
identified by 
numbers from 
1 to 200. 
password : Can be any 
combination 
of up to eight 
alphameric 
characters, 
user information : Up to 16 
bytes of 
user 

information, 
punched in 
columns 
56 to 71 . 


* .. SIGNOFF 







Task Management commands 



Operation 


Operands 


Comments 


* . . START 


ftask "I 


task : LST or PUN 




< task, class > 


class : Up to four classes can 




[MSG J 


be designated by 
specifying one to four 
alphabetic characters 
from A through Z. 
MSG : specifies that all 

subsequent broadcast 
messages directed to 
this terminal are to be 
accepted. 
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Task Management commands (continued) 



Operation 


Operands 


Comments 


* . . STOP 


ftask ] 
J task, EOJ 1 
] task, RESTART [ 

Imsg J 


task: LSTorPUN. 
EOJ: Stop until current entry 
has completed 
processing. 
RESTART : When the task is 
started again, 
processing will 
begin at the record 
following the last 
one processed 
before the STOP 
comment was issued. 
MSG : All subsequent broad- 
cast messages directed 
to the terminal are to 
be ignored. 


* .. GO 


task 


task : LST or PUN 


* ..FLUSH 


/task "I 
\task, HOLDJ 


task : LST or PUN 


* . . RESTART 


flask 1 
j^task, nj 


task : LST or PUN 
n : Signed or unsigned value 
from to 9999. 



Queue Management commands 



Operation 


Operands 


Comments 


* .. DISPLAY 




'queue, jobname Ljobnumber 


queue : LST, PUN or RDR 






queue [,ALL] 


jobname : Can be two to eight 






queue, HOLD 


alphameric 






queue, FREE 


characters 






queue, *abc 


jobnumber : One to five digits 




i 


queue, class 


long. 






ALL 


class : Can be specified as an 






HOLD 


alphameric character 






FREE 


from A through Z, or 






*abc 


from & to 4. 






MSG 


*abc : Requests the status of 






all entries having the 
first n characters of 
their jobnames in 
common. 
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Queue Management commands (continued) 



Operation 


Operands 


Comments 


* .. DISPLAY 
(continued) 




"abc" represents any 
combination of from 
one to seven characters. 
If the queue parameter 
is not specified, status 
information is displayed 
for all queues. 
MSG : Requests the display of 
all ALLUSERS-type 
messages that have been 
entered, together with 
their originators and all 
operator messages routed 
specifically to this 
remote-id. Operator 
messages are automatically 
deleted when they are 
displayed. 


* . . ALTER 


fjobname f, jobnumberl j 
queue<ALL > 
*abc 

Ulassl > 
[PR Apriority] 
[DISP=disposition] 
CCLASS.=class 2] 
Q COPY=number-of-copies] 
QREMOTE=remidJ 


queue : LST, PUN or RDR. 

jobname : Can be two to eight 
alphameric 
characters . 

jobnumber : May be one to five 
digits long. 

priority : Specified as a single 

digit from to 9. Nine 
is the highest priority. 

disposition : Can be specified 
as H, K, L, orD. 

class 1 : class of which all job 

entries are to be altered 

class 2 : can be specified as 

any alphabetic character 
from A through Z. Also, 
specifications from 
through 4 are allowed 
for input classes. 

remid : can be specified as any 
number from to 200. 
"0" indicates the central 
location. Only the "to" 
remote-id can be modi- 
fied with an ALTER 
command; the "from" 
remote-id cannot be 
modified. 
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Queue Management commands (continued) 



J 



Operation 


Operands 


Comments 


*.. DELETE 


(queue, jobnameT, jobnumber]"] 

queue, ALL 
< queue, class > 

queue, *abc 
[MSG[,n] J 


queue : LST, PUN or RDR. 
jobname : Can be two to 

eight alphameric 
characters, 
jobnumber : The jobnumber is 
from one to five 
digits long. The 
DISPLAY command 
can be used to 
obtain the job- 
number. 
*abc: All job entries with the 
same first n characters 
are to be deleted, 
"abc" represents any 
combination of up to 
seven alphameric 
characters. 
MSG,n: "n" is the message 
number. If n is 
omitted, all 
ALLUSERS-type 
messages that were 
entered from this 
rernote-id are 
deleted. 


* .. RELEASE 


f queue, jobname [, jobnumber] ] 
J queue [,ALLj 1 
j queue, class ( 
[queue, *abc J 


queue : LST, PUN or RDR 
jobname : Can be two to eight 
alphameric 
characters, 
jobnumber : The jobnumber is 
one to five digits 
long. 
*abc : All job entries with the 
same first n characters 
are to be released, 
"abc" represents any 
combination of up to 
seven alphameric 
characters. 
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Miscellaneous commands 



Operation 


Operands 


Comments 


* . . BRDCST 


remid, 'text' 


remid : Remote users can be 
identified by numbers 
from 1 to 200. A 
specification of 
indicates the central 
location, and a 
specification of 
ALLUSERS indicates 
all users. 

'text': The message can 

consist of from 1 to 40 
characters enclosed 
in single quotation 
marks. A single 
quotation mark within 
the message must be 
written as two quotation 
marks . 


* . . SETUP 


LST [,„] 


n : one or two digits that 

specify the number of pages 
to be printed. 
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The following table shows the JECL stataments and their functions : 



JECL Statement 


Function 


* $$ CTL 


Specifies a default input class 


* $$ JOB 


Indicates the beginning of a POWER/VS Job and provides 




handling information 


* U EOJ 


Indicates the end of a POWER/VS job 


* S$ RDR 


Inserts a diskette file into the input stream 


* $$ LST/ * $$ PR! 


Provides handling information for printed output 


* $$ PUN 


Provides handling information for punched output 


* $$ SLI 


Inserts data from a sub library into the job stream 


*n/* 


Used in a source statement library book to indicate the 




end of a DOS/VS job step ( used for the SLI statement 




only) 


*$$/& 


Used in a source statement library book to indicate the 




end of a DOS/VS job (used for the SLI statement only) 


* $S DATA 


Inserts data into a book retrieved from a source 




statement library. 



Each JECL statement consists of the following fields. 

1. Identification field. Contains the characters * $$ (asterisk-blank-dollar- 
dollar) in columns 1 through 4. 

2. Operation field. Specifies the JECL operation. It can directly follow the 
second dollar sign or be separated from the second dollar sign by one or 
more blanks. At least one blank must be placed between the operation field 
and the operand field. 

3. Operand field. Contains one or more keyword or positional parameters, 
separated by commas. Keyword and positional parameters cannot be mixed 
within one statement. 

4. Comments field. Can contain any information considered helpful by the 
user. 



Sequence field. Contains up to eight characters of optional information 
used for control statement identification. If present, the sequence field is 
positional ly dependent and must be coded starting in column 73. 
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Operation 



Operand 



*$$ CTL 



Class. 



Class : Can be specified as an 
alphameric character 
from A-Z or 0-4. 



keyword form : 



*$$ JOB 



fAUTONAME 



(jobname 

DISP --L. ... , 
disposition 

PRI = priority! 

[, CLASS = class] 

LUSER = user-informationl 



positional form 



*$$ JOB 



AUTUNAMb 
jobname 

'[° 1 

I disposition 

,r priority] 

,£" class] 



jobname : A JECL jobname 
specification can 
be from 1 to 8 
alphameric 
characters, 
beginning with an 
alphabetic 
character. 
: D, H, K or L. 
It is specified as a 
single digit from 
to 9. Nine is the 
highest priority. 
It can be specified as 
an alphameric character 
from A-Z or 0-4. 

user-information : 

Up to 16 bytes of user information 

can be specified, within quotes. 



dispostion 
priority : 



class : 



*$$ EOJ 



keyword form : 



* $$ RDR 



DEV = phys. unit number 
[", FID = file-id] 

|J ~ number of diskettes] 

c 



«c=^] 



Physical-unit number : 
Parameter is used for Data-mode 
processing. 

Omitted for SYS IN -processing. 
Identifies the physical unit 
number of the diskette either 
in the form X'cuu' or cuu. 
File id : 



[•«-£] 



positional form : 



* $$ RDR 



Physical unit-number 
,£ 'file-id"] 

f -L 1 

' number of diskettes 



Specitic file name as appears 

in the HDR1 label on the 

diskette. 

Can be one to eight alphameric 

characters between quotes. 

Number of diskettes : 

One to three digits can be 

specified. 

VSC : Volume sequence 

numbers must start with 
1. 
S : same as for VSC. 



POWER/VS JOB ENTRY CONTROL LANGUAGE (JECL) (...Continued) 



Operation 



Operand 



I 
keyword form : 

[' CLASS ={L s }j 

[[,REMOTE=remid] 

f.FNO.fe««L . 
I forms-number 

[,JSEP=sep] 

,COPY= J- . , 

L ^number-of-copte 

[~,RBM= (norbm 1, norbm 2j] 
[^,LTAB = line tab] 
£,RBS=norbs~j 

I , UCS=(phasename[", option]) 
I , FCB=phasename I 
[,LST=listaddrl 
positional form : 



•»te} 



"disposition I "cTassJ 
forms-number 

t i 

|number-of-copiesf 

(tapeaddr) 
> I norbm 1 
, f line tab] 



disposition : D,H,K,L,N or T. 
remid : Can be a number from 
to 200. (0 is central 
installation.) 
forms -number : Can be one to 
four alphameric 
characters long, 
sep : Can be to 9, 
number-of-copies : Can be one 
or two 
digits long 
tapeaddr : Can be 
cuu 
X'cuu' 
cuu,X'ss' 
X'cuu'^'ss' 
cuu,ss 
X'cuu',ss 
norbm 1 : This paramater is one 

to six digits long, 
norbm 2 : The number is one to 

six digits long, 
linetab : This parameter is 26 
digits long ; each 
subparameter is two 
digits. The format of 
linetab is : 
d0,dl,d2, ... dl2 
ncrbs : This parameter can be 
one to six digits long. 
A zero means that no 
segmentation will take 
place, 
phasename : The format of the 
parameter is 
(phasename, option), 
where "option" 
can be specified 
asF, C, CF, orFC. 
listaddr : The address can be 
either in the form 
SYSxxx, where xxx 
is LST or any valid 
programmer logical un 
unit ; or in the form 
cuu (or X'cuu 1 ). 
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Operation 



Operand 



Comments 



keyword form ; 
* $$ PUN 



r D ,sp=fe- ,. ) 

1_ [disposition 

[' clASS ={^ B } 

[REMOTE = rem id] 

[n«>.lm } 

|_ 1 forms -number J 

QjSEP=sep] 

f.coP-,=(l b , . j 

1 number-of -cop les j 
[,TADDR=(tapeaddr)] 
[],RBM=(norbm 1, norbm 2)\ 
[>UN=punadd7] 
f / RBS = norbs| 



positional form 
* $$ PUN 



IE- |" a 1 

disposition L.classJ 

r m 1 

[_ forms -number] 

|number-of-copies[ 
( tapeaddr) 
f norbm 1 1 



disposition : D,H # l,K,L, N 

orT. 
class : Can be specified as any 

alphabetic character, 
remid : Can be a number from 
to 200. Numbers 1 to 
200 are specific remote 
users. If remid is 0, 
punch output is directed 
to the central installation, 
forms -number : One to four 
alphameric 
characters long . 
sep : Number of job separator 

cards (0 to 9). 
number-of-copies : One or two 
digits long, 
tapeaddr : Format : 
cuu 
X'cuu' 
cuu,X'ss' 
X'cuv'fX'ss' 
cuu,ss 
X'cuu^ss. 
norbm 1 : One to six digits long, 
norbm 2 : One to six digits long, 
punaddr : The address can be 
either in the form 
SYSxxx where xxx is 
PCH or any valid 
programmer logical 
unit ; or in the form 
cuu ( or X'cuu'). 
norbs : Can be one to sixdigits 
long. A zero means that 
no segmentation will 
take place. 



*$$ SLI 



[sub I id. J bookname 



At execution time, the *$$ SLI 
(source library inclusion) statement 
causes the private and system 
source libraries to be searched 
for a book, which, when found, 
is inserted into the job stream. 



1-24 
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Operation 


Operand 


Comments 


*$$/* 






*$$/& 






* $$ DATA 


name 


name : can be from one to eight 
alphameric characters, 
the first character must be 
alphabetic. 



POWER/VS CONTROL BLOCKS 



CONTROL ADDRESS TABLE (CAT) 



Included by definition macro 1PWS$DPA for the permanent area. 

This table consists of a set of tables, addresses and constants in the permanent 
area of the POWER/VS partition, used to link the component routines of the 
POWER/VS subsystem during execution. 



Bytes 


Description/function of field 


Dec 


Hex 






Control address table 


00-15 
16-19 
20-23 
24-27 
28-31 
32-35 
36-39 
40-43 
44-47 


00-0F 
10-13 
14-17 
18-1B 
1C-1F 
20-23 
24-27 
28-2B 
2C-2F 


Storage descriptor (CAT) 

POWER/VS master ECB 

Start address POWER/VS partition 

Start address fixable area 

Start address pageable area 

End address POWER/VS partition +1 

Start address LTA 

End address LTA +1 

Address of POWER/VS PIB 






Relocation constant 


48-51 


30-33 


Relocation constant used by initiator to calculate 
the relocation factor for addresses in the 
following tables. (To enable POWER/VS to be 
loaded in any partition.) Value = X'170'. 






External interface addresses 


52-55 
56-59 
60-63 
64-67 
68-71 . 
72-75 


34-37 
38-3B 
3C-3F 
40-43 
44-47 
48-4B 


Attention interface 
Page fault appendage 
Hot reader routine 
RJE CE appendage 
SVC appendage 
SVC 90/91 appendage 






Resource control block addresses. These addresses 
are collectively referenced by label CAFR. 


76-79 
80-83 
84-87 
88-91 


4C-4F 
50-53 
54-57 
58-5B 


Disk management block 
Account control block 
Storage control block 
Message control block 
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CONTROL ADDRESS TABLE (CAT)(. . .Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Module control bjpck address table 

The addresses in this table are used by the disk 
services and are established when the POWER/VS 
disk files are opened at system start-up time. 


92-95 

96-99 

100-103 

104-107 

108-111 

112-115 

116-119 

120-123 

124-127 


5C-5F 
60-63 
64-67 
68-6B 
6C-6F 
70-73 
74-77 
78-7B 
7C-7F 


Accounting module 
MCB queue file ' 
MCB data file module 1 
MCB data file module 2 
MCB data file module 3 
MCB data file module 4 
MCB data file module 5 
MCB private SSL 
MCB system SSL 






Task state values and addresses of state processing 
routines 

These constants are used by the task management 
macro instructions to set values within the task 
selection fields of the task control blocks. 


128-131 
132-135 
136-139 
140-143 
144-147 
148-151 
152-155 
156-159 
160-163 
164-167 
168-171 
172-175 


80-83 
84-87 
88-8B 
8C-8F 
90-93 
94-97 
98-9B 
9C-9F 
A0-A3 
A4-A7 
A8-AB 
AC-AF 


The task is inactive, task not selected 

Branch to TM10 

Page fault in process, task not selected 

Branch to TM10 

Wait for operator, task not selected 

Branch to TM10 

Wait on locked resource, test lockword 

Branch to TM30 

Wait on LTA/PTA, tets control blocks 

Branch to TM55 

Wait on multiple posting, test control blocks 

Branch to TM50 

Wait on class table posting, test control blocks 

Branch to TM50 

Wait on single posting, test control block 

Branch to TM80 

Wait on space posting, test control blocks 

Branch to TM80 

Immediate dispatch, dispatch the task 

Branch to TM90 

Wait state. Used for WCB only. 

Wait routine. Branch to TM20. 

The task is running, no selection address 
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CONTROL ADDRESS TABLE (CAT) (...Continued) 




Bytes 






Dec 


Hex 








Permanent TCB addresses 


176-179 


B0-B3 


Wait control block 


180-183 


B4-B7 


Command processor TCB 


184-187 


B8-BB 


Initialization/termination TCB 


188-191 


BC-BF 


Line manager TCB 






Task control address table 


192-195 


C0-C3 


Task identifying prefix (L) and the address of the 
TCB of the line manager (or of rhe wait control 
block if the line manager is not present). 


196-199 


C4-C7 


Task identifying prefix (O) and the address of the 
TCB of the most recently attached auxiliary 
command processor (or of the permanent command 
processor if no auxiliary command processor 
presently exists). 


200-203 


C8-CB 


Task identifying prefix (X) and the address of the 
TCB of the most recently attached remote (RJE) 
reader/writer. 


204-207 


CC-CF 


Task identifying prefix (W) and the address of the 
TCB of the most recently attached local writer 
task. 


208-211 


D0-D3 


Task identifying prefix (E) and the address of the 
TCB of the most recently attached execution 
processor task. 


212-215 


D4-D7 


Task identifying prefix (R) and the address of the 
TCB of the most recently attached reader task. 


216-219 


D8-DB 


X'FFOOOOOO' (list delimiter) 






Module load addresses (listed as loaded in the 






pageable area) 


220-223 


DC-DP 


Command processor 


224-227 


E0-E3 


Logical reader 


228-231 


E4-E7 


Physical reader 


232-235 


E8-EB 


Put data record function 


236-239 


EC-EF 


Scan and check parameter function 


240-243 


F0-F3 


Logical writer 


244-247 


F4-F7 


Physical list 


248-251 


F8-FB 


Get data record function 


252-255 


FC-FF 


Physical punch 


256-259 


100-103 


Execution reader 


260-263 


104-107 


Get data record function (copy 2) 


264-267 


108- 10B 


Execution writer 


268-271 


10C-10F 


Put data record function (copy 2) 
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CONTROL ADDRESS TABLE (CAT) (...Continued) 



Bytes 






Dec 


Hex 








Module load addresses (listed as loaded in the 
pageable area) (. . .continued) 


272-275 
276-279 
280-283 
284-287 
288-291 
292-295 
296-29? 
300-303 
304-307 
308-311 
312-315 
316-319 
320-331 
332-335 
336-339 
340-343 
344-347 
348-351 
352-355 
356-359 


110-113 
114-117 
118-11B 
11C-11F 
120-123 
124-127 
128-12B 
12C-12F 
130-133 
134-137 
138-13B 
13C-13F 
140-14B 
14C-14F 
150-153 
154-157 
158-15B 
15C-15F 
160-163 
164-167 


JBCL analysis 
Reserve queue function 
Add to queue function 
Get next from queue function 
Delete from queue function 
Free queue function 
LUB/PUB update function 
Print queue status report 
Pass internal command 
Task terminator ' 
3540 Physical reader 
3540 OPEN function 
Reserved 

Remote job entry 
Remote message handler 
User reader exit routine 
Put account function 
Get account function 
Save account function 
Get SSI function 


• optional phases 






Service routine branch table 

The branch instructions are used to transfer control 
from service routine macro instructions to the 
appropriate service code. 


360-363 
364-367 
368-371 
372-375 
376-379 
380-383 
384-387 
388-391 
392-395 
395-399 
400-403 
404-407 
408-411 
412-415 
416-419 
420-423 
424-427 


168-16B 
16C-16F 
170-173 
174-177 
178-17B 
17C-17F 
180-183 
184-187 
188-18B 
18C-18F 
190-193 
194-197 
198-19B 
19C-19F 
1A0-1A3 
1A4-1A7 
1A8-1AB 


Attach task 

Detach task 

Task selection 

Initial task entry 

Reserve resource 

Release resource 

Reserve workspace 

Release work space 

Message service 

Set write command code 

Disk service 

Set read command code 

Disk service 

Tape service 

Timer service 

Remote message service 

Address indication service 



POWER/ VS CONTROL BLOCKS (. . .CONTINUED) 



CONTROL ADDRESS TABLE (CAT) (. . .Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Block length table 

The table is used by the IPW$RSW macro instruction 
to identify the size of work space required to 
accommodate certain control blocks. 


428-431 
432-435 


1AC-1AF 
1B0-1B3 


Data buffer - set by IN IT (amount of storage 

required to accommodate the data block) 

Data block - set by IN IT (size of record written to 

disk) 






Miscellaneous non -relocatable constants 


436-439 
440-443 


1B4-1B7 
1B8-1BB 


Line control block address 
Reserved 






Statistical information 


444-445 
446-447 
448-451 
452-455 
456-459 
460-463 
464-467 
468-471 
472-475 
476-479 
480-483 
484-487 
488-491 
492-495 


1BC-1BD 

1BC-1BF 

1C0-1C3 

1C4-1C7 

1C8-1CB 

1CC-1CF 

1D0-1D3 

1D4-1D7 

1D8-1DB 

1DC-1DF 

1EQ-1E3 

1E4-1E7 

1E8-1EB 

1EC-1EF 


Highest remote-id 
Number of lines 
Total number of queue records 
Number of free queue records 
Maximum number of queue records used 
Total number of tracks data file 
Number of free tracks data file 
Maximum number of tracks used 
Number of times waiting for storage 
Total number of pages allocated 
Current number of pages allocated 
Maximum number of pages allocated 
Current number of tasks 
Maximum number of tasks 






Fullword constants 


496-499 
500-503 
504-507 
508-511 


1F0-1F3 
1F4-1F7 
1F8-1FB 
1FC-1FF 


FT 
F'4' 
F'8' 
F'24' 






Translation tables 


512-767 
768-1023 


200-2FF 
300-3FF 


This table is used to scan sequences of blank 
characters for the first non-blank character and 
also as a source of blank characters for various 
program purposes . 

This table is used to scan sequences of non-blank 
characters for the first blank character and also as a 
source of zero characters for various program 
purposes . 



How to locate ; Start of POWER/VS partition + X'140'. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



WAIT CONTROL BLOCK (WCB) 



Bytes 


Description/function of field 


Dec 


Hex 


00-15 

16-19 
20-23 

24-27 
28-31 


00 -OF 

10-13 
14-17 

18-1B 
1C-1F 


Storage descriptor (WCB) 

Reserved 

Address of TCB belonging to task with highest 

priority in TSL 

Page fault request word - always zero 

Task selection field 

Byte : X'E6' 

Byte 1-3 : Address of routine that tests if a 

POWER/VS event is posted in main 
ECB. If no event, it pieces the 
POWER/VS partition in wait state 
by issuing an SVC 7 to DOS/VS 
supervisor. 



How to Locate : 



Displacement X'B0-B3' of the CAT contains a pointer 
to the WCB . 



POWER/ VS CONTROL BLOCKS (. . .CONTINUED) 
STORAGE CONTROL BLOCK (SCB) 



Definition macro : IPW$DSC 



Bytes 




Description/ function of field 




Dec 


Hex 




00-15 


00-OF 


Storage descriptor (SCB) 


16-19 


10-13 


Last permanent page 




20-23 


14-17 


First fixed page 




24-27 


18-1B 


Event control block (refer to Appendix H) 




28-31 


1C-1F 


Lockword 




32-35 


20-23 


Task register 14 






36-39 


24-27 


Task register 15 






40-43 


28-2B 


Task register 






44-47 


2C-2F 


Task register 1 


© 




48-51 


30-33 


Task register 2 




52-55 


34-37 


Task register 3 






56-59 


38-3B 


Task register 4 






60-63 


3C-3F 


Task register 5 






64-127 


40-7F 


Storage assignment table \2j 


128-135 


80-87 


Constant to initialize the first BCW 

(see Figure 5.21) in a new fixed page in the 

fixable area. 




136-143 


88-8F 


Constant to initialize the last BCW in a new 








fixed page in the fixable area (see Figure 5. 


21) 






Page fix/f ree w ° r k area Q) 


144-147 


90-93 


Page virtual address (3) 




148-151 


94-97 


Page length (-1) © 




152-155 


98-9B 


End-of-list indicator (X'FFOOOOOO 1 ) 




156-159 


9C-9F 


Reserved 





(7) Since the storage management routines are used to provide register save areas 
for task use, the storage control block must contain a register save area for use 
by the storage management routines. 

(5) The storage assignment table is like a map of the fixable area within the 

POWER/ VS address space in which each page control byte represents a single 
page of address space. Each byte within the table takes one of four values. 

X'00' Page free (and not last page) 

X'40' Page free (and last page) 

X'80' Page in use (but not last page) 

X'CO' Page in use (and last page) 



) POWER/VS CONTROL BLOCKS (...CONTINUED) 



STORAGE CONTROL BLOCK (SCB) (. . Continued) 



The storage assignment table is defined with all pages free and is 
properly initialized by the POWER/VS start-up routines to reflect the 
amount of real storage available to the POWER/VS partition at that 
time. 

(3) Three fullwords used as a work are by the page-fix and page-free 

routines. The first word is used to contain the address of the first byte 
of the page to be fixed or freed; the second word contains binary 2047 
(page size minus one) ; and the third word contains X'FF' in its high-order 
byte to act as a list terminator. 



How to Locate : Displacement X'54-57' of CAT contains a pointer to the SCB. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
MESSAGE CONTROL BLOCK (MMB) 
Defintion macro : IPW$DMM 



Bytes 


Description/function of field 


Dec 


Hex 


00-15 


00-0F 


Storage descriptor (MMB) 


16-23 
24-27 
28-31 


10-17 
18-1B 
1C-1F 


Work area 

Reserved 

Lockword 






CCB 


32-33 

34-35 

36-37 

38-39 

40 

41-43 

44-47 


20-21 

22-23 

24-25 

26-27 

28 

29-2B 

2C-2F 


Residual count 

CommunicaSion bytes 

Status bytes 

LUB identifier 

Flags 

Channel program address 

DOS/VS internal use 






Channel program 


48-55 
56-63 


30-37 
38-3F 


Write CCW 
Read CCW 


64-135 


40-87 


Message output area 


136-183 
184-187 
188-191 


88-B7 
B8-BB 
BC-BF 


Reply input area 

Save area for register 5 

Constant of character ObOP 



How to Locate : Displacement X'58-5B' of the CAT contains a pointer to 
the MMB. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
DISK MANAGEMENT BLOCK (DM8) 
Definition macro : IPWSDQC 



J . The disk management block area is used to control access to the POWER/VS 
queue file. It is located in the permanent area of the POWEFyVS partition. 

The disk management block is divided into the following areas : 

o Resource control fields 

o File control fields 

o Record control fields 

o Master record area 

o Auxiliary account record area 

o Auxiliary queue record area 

o Master class table area . 

Detailed Description of Fields : 



Bytes 


Description/function of field 


Dec 


Hex 






Resource control fields 

They are used to manage the resources contained 
within the DMB 


00-15 
16-23 
24-27 
28-31 


00-OF 
10-17 
18-1B 
1C-1F 


Storage descriptor (DMB) 

Reserved 

Event control block 

Lockword 






File control fields 

They contain parameters relating to queue file, 
data file, and, if used, private and system SSL 


32-35 
36-39 
40-87 
88-95 

96-99 
100-103 
104-127 
128-159 

160-163 
164-167 
168-215 
216-223 


20-23 
24-27 
28-57 
58-5F 

50-63 
64-67 
68-7F 
80-9F 

A0-A3 
A4-A7 
A8-D7 
D8-DF 


Number of records/track queue file (?) 
Number of tracks/cylinder queue file (2) 
Queue file sector table 
Reserved 

Number of records/track data file Q) 
Number of tracks/cylinder data file (2) 
Track group control table 
Data file sector table 

Number of records/track SSL (J) 
Number of tracks/cylinder SSL (?) 
SSL sector table 
Reserved 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Record control fields 

They contain information used to read and write 
records to and from the master record area and 
auxiliary queue record area. 


224-231 
232-235 
236-239 
240-247 
248-251 
252-255 


E0-E7 
E8-E3 
EC-EF 
F0-F7 
F8-FB 
FC-FF 


Master record seek address (MBBCCHHR) 

Real master area address 

Virtual master area address 

Queue record seek address (MBBCCHHR) 

Real auxiliary queue record area address 

Virtual queue record area address 




> 


Master record area 

The master record is written as the first physical 
record within the queue file extent. During 
POWER/VS execution a copy of the master record 
is maintained in this area. Whenever this copy is 
updated a replacement master record is at once 
written to the queue file so that, in the event of a 
failure of the system, warm start information can be 
recovered from the direct access device in question. 


256-263 

264-267 

268-271 
272-275 

276-279 


100-107 

108-10B 

10C-10F 
110-113 

114-117 


Date 

These eight bytes contain the date of POWER/VS 
execution in the format chosen at system generation 
(dd/mm/yy or mm/dd/yy). 

POWER/VS start time 

These four bytes contain the start time of 

POWER/VS execution in packed decimal format. 

Reserved 

Data block size 

This fullword contains a fixed-point binary value 
representing the block size of the data blocks 
within the data file. 

Track group size 

This fullword contains a fixed-point binary value 
representing the number of tracks within each track 
group within the data file. 



POWER/VS CONTROL BLOCKS (. . . CONTINUED) 



DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/ function of field 


Dec 


Hex 


280-281 


118-119 


Version and modification level 

Two numeric characters representing the version and 

modification level of POWER/VS used. 






Programming Note : The following 6 switch bytes 
preserve the options established by the POWER/VS 
user at the time he generated his version. 


282 

283 

284 
285 

286 
287 


11A 

1 IB 

11C 
11D 

he 

11F 


Source library switch 

This byte contains a single alphabetic character 
representing the source statement sublibrary to be 
associated, unless otherwise specified, with any 
JECL SLI statements encountered in the read queue. 

Job accounting switch 

This byte contains a single alphabetic character ; 
the character A indicates that POWER/VS job 
accounting is required; a blank character indicates 
that POWER/VS accounting is not required. 

Reserved 

LOG option switch (set to character L if JLOG=YES 
and blank if JLOG=NO) 

Termination status. Contains character A for 
incomplete session or abnormal termination. 
Otherwise, it contains character N, meaning 
normal termination. 
Note : It will contain an A during the session. 

Reserved 






Programming Note : The following 14 bytes contain 
standard POWER/VS default values used when new 
queue records are created. 


288-295 
296-297 


120-127 
128-129 


Default job name 

These eight bytes contain the character string 

'AUTONAME' used as a default job name. 

Master job number 

This halfword contains a fixed-point binary value 
representing the next job number to be assigned by 
POWER/VS. It is incremented by one each time it 
is used. 



POWER/ VS CONTROL BLOCKS (. . .CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


298 
299 

300 

301 
302-303 


12A 
12B 

12C 

12D 
12E-12F 


Master queue Identifier 

This byte contains the alphabetic character M to 

show that this is the master record. 

Default class attribute 

This byte contains the alphabetic character A 
representing the class attribute to be given by 
default to each RDR queue entry created within 
POWER/ VS. 

Default priority attribute 
This byte contains numeric character 3 which 
defines the priority attribute to be given by 
default to each queue entry created by 
POWER/ VS. 

Default cancel code 

This byte contains the hexadecimal characters 

X'10' representing normal end of job and task 

Reserved 






Programming Note : Next 16-byte field contains the 
master line table, consisting of system default 
values used to analyse space and skip operations 
during printer control carriage simulation. 


304-319 


130-13F 


Line table 






Programming Note : Next 16 bytes contain the 
master list values, which will be inserted by default 
in list queue records, unless overridden by a 
JECL statement. (Values are set by IPW$$I1 using 
those specified by user during POWER/VS 
generation (JSEP=, RBS=, STDLINE= )) 


320-322 

323 

324-327 

328-331 

332-335 


140-142 
143 

144-147 
148- 14B 
14C-14F 


Reserved 

Number of separators 
Records before segmentation 
Records before message 
Records before message 






Programming Note : Next 16 bytes contain the 
master punch values, which will be inserted by default 
in punch queue records, unless overridden by a 
JECL statement. (Values set by IPWSSll using those 
specified by user during POWER/VS generation. 
(JSEP=, RBS=, STDCARD-)) 



POWER/VS CONTROL BLOCKS (.. .CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


336-338 

339 

340-343 

344-347 

348-351 


150-152 

153 

154-157 

158-15B 

15C-15F 


Reserved 

Number of separators 
Records before seqmentation 
Records before message 
Records before next message 






Programming Note : Next 10 bytes contain account 
file values. 


352-359 
360-361 
362-375 


160-167 
168-169 
16A-177 


Account file seek address (MBBCCHHR) 

Contains the direct access storage seek address of the 

last record in the POWER/ VS account file. 

Account file record maximum size 

Binary value representing the length of the longest 

record so far written to the account file. 

Reserved 






Programming Note : Next 32 bytes contain free 
queue pointers. 


376-383 
384-407 


178-17F 
180-197 


First record in free queue (MBBCCHHR) 
Reserved 






Auxiliary account record area 

This area actually overlaps the auxiliary queue 
record area, because the account record consists 
of the first part of the queue record which is built 
in that area. All account records except execution 
account are transferred from here to the account 
file as standard variable length records. 


408-415 


198-19F 


Block and record length 

This record control field is used for sequential 
access method. 






Auxiliary queue record area (152 bytes) 
This area is required as a work space for an additional 
queue record. For example, for updating class chain 
addresses during the add to queue function. The first 
part (96 bytes) of the Q record contains body fields 
(information pertinent to this particular queue entry 
and the user job which created it). 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


416-423 


1A0-1A7 


Date in format specified at SYS GEN 
(mm/dd/yy or dd/mm/yy) 




424-427 


1A8-1AB 


Operation start time, in packed decimal 
(OHHMMSSF ; F = sign) 




428-431 


1AC-1AF 


Operation end time (OHHMMSSF ; F = sign) 




432-447 


1B0-1BF 


16 bytes user information 




448-455 


1C0-1C7 


Job name 

Job name associated with this particular POWER/VS 

or DOS/VS job. If no job name is provided by the 

user the default value AUTONAME is set into this 

field. 




456-457 


1C8-1C9 


Job number 

Contains a binary job number assigned to the job 
upon its entry into the system and thereafter 
available for further identification of jobs with a 
common job name. 




458 


1CA 


Queue record identifier 

R = read queue record 
L = list queue record 
P = punch queue record 
F = free queue record 
D = dummy queue record . 




459 


1CB 


POWER/VS cancel codes 
Cancel Code Condition 








X'10' Normal end of POWER/VS job or task 

X'20' PCANCEL has been issued 

X'30' PSTOP has been issued @ 

X'40' PFLUSH has been issued 

X'50' PDELETE has been issued 

X'60' PFLUSH has been issued via 

RDREXIT 
X'70' Canceled due to I/O error 


® 


460 


ICC 


Line identifier/device type 




461-463 


1CD-1CF 


Channel and unit (line address) 





) POWER/VS CONTROL BLOCKS (...CONTINUED) 

DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


464 


1D0 


From-terminal identifier 


465 


1D1 


To-terminal identifier 


466 


1D2 


Class (default = A) 


467 


1D3 


Priority (default = 3) 

This single byte contains the priority value 
(numeric to 9), assigned by the user to this 
job operation. 


468-471 


1D4-1D7 


Record count 

Binary counter that represents the number of 
input or output data records associated with the 
read, list, or punch operation (data transfer and 
control operatfons). 


472-473 


1D8-1D9 


Number of tracks for output storage 
Binary counter recording the number of tracks 
within the data file used to contain data input or 
output for this particular job operation. 


474 


IDA 


Job suffix number 

Binary job suffix number assigned to each successive 
operation (read, list, or puch) performed on behalf 
of the job. It may be used to identify output sets 
produced by jobs handling segmented output. 


475 


1DB 


Number of copies 

This single byte contains a binary value indicating the 
number of copies of printed or punched output that 
are to be produced when the output is processed by the 
writer tasks. It has no use within Input-related 
queue records. 


476-479 


1DC-1DF 


Forms identifier 

Alphameric forms or card identifier of any special 
stationery or card stock to be used when creating the 
physical output from the job. A blank value indicates 
that no special requirement exists. The field has no use 
within input-related queue records. 


480-483 


1E0-1E3 


Number of additional records. 



1-41 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/ function of field 


Dec 


Hex 


484-485 


1E4-1E5 


Number of pages (number of skips to channel 1) 


486-487 


1E6-1E7 


Number of extra pages 


488-491 


1E8-1EB 


Line/card counter (data transfers only) 


492-495 


1EC-1EF 


Restart page counter (used when PRESTART command 
given) 


496 


1F0 


Copies remaining (used when PRESTART command 
given) 


497 


1F1 


Not used 


498 


1F2 


Disposition (default = D) 


499 


1F3 


Number of separators 

Binary value indicating the number of printed output 
separators to be produced. It has no use within input- 
related queue records. 


500-503 


1F4-1F7 


Number of records before segmentation (count driven 
segmentation) 


504-507 


1F8-1FB 


Records before message 

Binary value representing the maximum number of list 
or punch data records that is to be tolerated by this 
job. When the record count exceeds the maximum value 
a warning message is output to the system operator. 


508-511 


1FC-1FF 


Records before next message 

Additional number of list or punch data records that is 
to be tolerated by the job each time the record count 
exceeds the maximum value specified in the preceding 
field and the system operator elects to continue 
execution of the job. 


512-513 


200-201 


3540 Physical device addres (packed) 


514-519 


202-207 


Reserved 






The second portion (56 bytes) of the queue record 
contain control fields (information relating to the status 
of the queue record and to its position within the 
POWER/VS queues). 


520 


208 


Execution switch 
x = job in execution 
b = job not in execution 


521 


209 


First in set switch 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 




Description/function of field 






Dec 


Hex 




522 


20A 


Segmentation type 

c = count driven segmentation 
p = program driven segmentation 
d = data driven segmentation 
b = no segmentation 


523-535 


20B-217 


Reserved 


536-543 


218-21F 


Next record in set (MBBCCHHR) 

M = index in module control block address 

table in CAT. 


544-551 


220-227 


Pointer to previous queue record 

(MBBCCHHR) 

M = index in module control block address table in 

CAT. The meaning of this pointer depends on the 

value of the contents in field QCFS. (displ. X'20T) 


552-559 


228-22F 


Pointer to next queue record (MBBCCHHR) 
M = index in module control block address table 
in CAT. The meaning of this pointer depends on the 
value of the contents in field QCFS. (displ. X'201') 


560-567 


230-237 


Seek address of first data block (MBBCCHHR) 
M = index in module control block address table in 
CAT. Seek address of the first read, list, or punch 
data block associated with the input or output 
described by this queue record. 


568-575 


233-23F 


Reserved 






Master class table area 






Defines the status of the POWER/VS queues. 


576-703 


240-2BF 


Reader class area (32 entries, that is, 1 dummy entry 
and 31 entries 0-4 and A-Z) 


704-831 


2C0-33F 


List class area (32 entries, that is, 6 dummy entries 
and 26 entries A-Z) 


832-959 


340-3BF 


Punch class area (32 entries, that is, 6 dummy entries 
and 26 entries A-Z) 



PQWER/VS CONTROL BLOCKS (...CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hec 






Each entry is defined as a class list entry (DSECT=) 
and consists of the following two 2-byte fields : 
1st field : Relative record number of last queue 

record in queue set in this class chain. 
2nd field: Relative record number of first queue 

record in queue set in this class chain. 

The high-order bit in the last field indicates whether 
there is a queue entry in this class that can be 
dispatched. 



Q) This fullword contains a fixed-point binary value, representing the number of 
records per track characterising the DASD on which the file is located. 

(2) This fullword contains a fixed-point binary value, representing the number of 
tracks per cylinder characterising the DASD on which the file is located. 

(3) This code indicates that the corresponding queue entry was not affected by an 
abnormal PCWER/VS termination. The DOS/VS jobs associated with the queue 
entry, however, could have been canceled via DOS/VS. 

(3) The PSTOP cancel code will not be stored in an account record if the EOJ 
option was specified with the PSTOP command. 



How to Locate : Displ. X'4C-4F' of CAT contains pointer to the DMB. 



POWER/VS CONTROL BLCCKS (...CONTINUED) 
TASK CONTROL BLOCK (TCB) 
Definition macro : IPWSDTC 



The TCB is divided into the following main areas : 

o Task management fields 

o Task register save area (TRSA) 

o File control words and general task work area (2) © 

o Linkage register save area (LRSA) Q) (2) © 



Q) The LRSA may be the first part of a double linkage register save area 

(DLRSA). 

(5) When the TCB belongs to a command processor task, the file control 

words, general task work area, and linkage register save area are replaced 
by a command processor control block. 

(§) When the TCB belongs to an RJE line manager task, the file control words, 

general task work area, and linkage register save area are replaced by 
information for the line manager. 



PO WER/ VS CONTROL BLOCKS (...CONTINUED) 



TCB - TASK MANAGEMENT FIELDS 



Bytes in TCB 


Description/function of Task management fields 


Dec 


Hex 






The firsh 16 bytes contain the storage descriptor 


00-03 
04-07 


00-03 
04-07 


Storage descriptor block ID (TCB) 
Task ID 

X'D6' (C) TCB belongs to a command processor 
task. Remaining 3 bytes are 'J^CP' 

X'C9' (1) TCB belongs to an initiator. 
Remaining 3 bytes are 'bIT 1 . 

X'E3' (T) TCB belongs to a terminator task. 
Remaining 3 bytes are '#17'. 

X'D9' (R) TCB belongs to a local reader. 

X'E6' (W) TCB belongs to a local writer. 

X'C5' (E) TCB belongs to an execution 
processor tcsk. 

In this case the next byte contains 
X'40', and the remaining bytes in 
the field indicate the partition that 
requested the task. For example, 
X'C6F1'= foreground 1 partition. 

X'Fl'-'FO' TCB belongs to an RJE task. 

In this case the, three remaining bytes 
will indicate the type of task. For 
example, X'D9C4D9' =RDR. 

X'D3' (L) TCB belongs to a line manager task. 
Remaining 3 bytes are 'RLM'. 

X'D7' (P) TCB belongs to a status task. 
Remaining 3 bytes are 'JrfPS'. 

X'40' (b) TCB belongs to an account task. 
Remaining 3 bytes are 'ACT'. 


08-11 


08-OB 


Physical device ID 

Physical unit address. If byte of the task ID field = 
X'FT - X'F9' (1-9), then it contains the RJE line 
number. 


12-15 


0C-0F 


Terminal ID 

Identifies the terminal ID requiring the task. When 
binary zeros (0000), then task started as result of 
command invoked by the central operator. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
TCB - TASK MANAGEMENT FIELDS ( Continued) 



Bytes in TCB 


Description/function of Task management fields 


Dec 


Hex 






The following two fields form part of the task selection 
list (TSL). 


16-19 


10-13 


Address of task control block belonging to previous 
task in task selection list. 


20-23 


14-17 


Address of task control block belonging to the next task 
in task selection list. If the present is the last task 
control block in the chain, the address is that of the 
wait control block. 


24-27 


18-1B 


Page fault request word. Contains page fault request 
information resulting from a page fault interrupt. 
Contents of GPR 13, passed from DOS/VS supervisor 
and saved for page management in the event of a 
page fault occurring during execution of the task. 
The field is set to binary zeros when no page fault 
request condition is present; hence, it will contain 
binary zeros during the time that the task is in control 
of the central processor. 


28-31 


1C-1F 


Task selection field. 

Byte (the first byte in the field ) = Task State Value 

Task State Values 

At any time, each task within the POWER/VS must be in 
one or another of a set of task states. The state of each 
task is defined by the single alphameric character in 
byte 28 of the associated task control block, and this in 
turn determines what action the task management 
routines must take when the task is examined for dispatch. 

Task states are normally set by the task itself whenever 
one of the task management macros is issued. The task 
management routines and the command processing task 
are privileged, however, in that they may modify the 
task state of tasks other than themselves. 

Note : Task states can also be set by the page fault 
appendage routine. 



POWER/ VS CONTROL BLOCKS (. . .CONTINUED) 
TCB - TASK MANAGEMENT FIELDS ( Continued) 



Bytes in TCB 


Description/ function of Task management fields 






Dec 


Hex 








Task states 


Hex 


Char 


Task condition 




C9 


1 


Task is inactive 






Not 


07 


P 


Page fault in process 






dispatchable 


D6 


O 


Waiting for operator 
response 




D3 


L 


Waiting for locked 












resource 








C6 


F 


Waiting for the LTA 
or PTA 






Conditionally 


D4 


M 


Wait on multiple CCB 






dispatchable 






or ECB posting (j) 








D8 


Q 


As for M state, except 
event may never occur 








C3 


C 


Wait on single CCB or 
ECB posting © 








E2 


S 


As for C state, except 
event may never occur 


Immediately 


C4 


D 


Dispatch task 






dispatchable 






immediately 


Running 


D9 


R 


Task is running 


(T) or for an RJE task, waiting for a single ECB 






posting. 






(2) or for an RJE task, waiting for a multiple ECB 






posting. 


Bytes 1-3 = Address of the routine in the nucleus 






that tests for the condition indicated 






by the task state. 


32-48 


20-30 


Task class list ( plus a 1-byte field of X'FF') 
Up to four different classes can be specified 
simultaneously for any task, except RDR. For each 
class identifying character an entry is made in this 
field. The first byte of each entry contains the class, 
and the remaining three bytes contain an address of 
an ECB in the master class tcble area (in DMB). 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
TCB - TASK MANAGEMENT FIELDS (Continued) 



Bytes in TCB 



Description/function of Task management fields 



Termination 


type 


Hex 


Char 




40 


(b) 


Normal - continue execution 


E4 


(O) 


Unrecoverable I/O error 


E7 


(X) 


Task cancel condition 


C3 


(C) 


PCANCEL command issued 


C6 


(F) 


PFLUSH command issued 


C5 


(E) 


Stop at end of job 


E2 


(S) 


Stop immediately 


C8 


(H) 


PFLUSH with hold issued 


D9 


(R) 


Stop immediately and restart 



Job boundary switch 

FF = Start of job 

00 = Job boundary 

80 = No job started yet 

Function track indicator 

This indicator is used by the task terminator phase (TR) 
to determine the appropriate action in case of an I/O 
error on the queue file or the data file. The 
following entries are possible : 

On input : 



X'D5' 


N 


- Get next from queue 


X*C9' 


1 


- Open for input 


X'C7' 


G 


- Get in process 


X'C4' 


D 


- Delete in process 


X'C3' 


C 


- Free pending 


X'C6' 


F 


- Free in process 


X'C5' 


E 


- End of queue action, awaiting 
accounting action 


X'D3' 


L 


- Put account record in process 


X'00' 





- No entry active 


X'40' 


b 


- No entry active 



POWER/V5 CONTROL BLOCKS (...CONTINUED) 
TCB - TASK MANAGEMENT FIELDS ( Continued) 



Bytes in TCB 


Description/ function of Task management fields 


Dec 


Hex 


52-55 


34-37 


Function track indicator (continued) 

On output : 

X'D9' R - . Reserve queue in process 

X'D6' O- Open for output 

X'D7' P - Put in process 

X'OT A - Add to queue 

X'05' E - End of queue action, awaiting 

accounting action 
X'D3' L - Put account record in process 
X'00' - No entry active 
or 
X'40' b - No entry active 

Task event control block 






Each POWER/VS task that needs to perform input 
or output operations addressed to the system console 
must specify the operation required in the form of a 
message request word or a reply request word. 
These control fields are used to pass the necessary 
parameters for the operation of the message service 
routines. 


56-59 
60-63 


38-3B 
3C-3F 


Message request word. 

Byte : Hold flag and R5 flag. 
Byte 1-3 : Message address. 

The message address field contains the virtual address 
of the message control byte, that is, the byte that 
immediately precedes the test of the message to be 
output. 

Reply request word 

Byte 0: Binary 0. 

Byte 1-3 : Reply address. 

The reply address field contains the virtual address of 
the reply control byte, that is, the byte that 
immediately precedes the input area into which the 
reply is to be read. 

If no reply is to be made to the message, this 
field must contain binary zeros. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



TCB - TASK REGISTER SAVE AREA (TRSA) 



Bytes in TCB 



Description/ function of Fields in TRSA 



Register 12 - asynchronous address register 
('task PSW') 

Register 12 contains the address of the first instruction 
to be executed when the task is despatched. The first 
byte contains the condition code and the program mask 
bits in the form in which they are loaded by BAL 
instructions. (This is also true when the information is 
provided by the page fault appendage routines.) 

Register 13 - save area register 

Register 13 may contain the address of either the first 
(or only) or second linkage register save area depending 
on the hierarchy level of the caller. 

Register 14 - linkage register 

Register 14 is used to contain the linkage address, that 
is, the address to which return is to be made when an 
exit linkage is next performed. When not required for 
this purpose the register is available for general use. 

Register 15 - entry point register 

Register 15 is used to address the entry point of the 
routine to be entered when an entry linkage is 
performed. This address is normally that of the storage 
descriptor which precedes the routine to be executed. 
The register may be conveniently used as the base 
register for the function to be executed. When not 
required for this purpose the register is available for 
general use. 

Register 1 - parameter and work register 

Register 1 may address a control block or control block 
list on which the task is at present waiting. For a task 
in C or S state it will point to a conventional DOS/VS 
CCB or a POWER/VS ECB. For a task In M or Q state, 
it will point to an ACB or CCB list. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
TCB - TASK REGISTER SAVE AREA (TRSA) (Continued) 



Bytes in TCB 


Description/function of Fields in TRSA 


Dec 


Hex 


88-91 


58-5B 


Register 2 - linkage and work register 

Register 2 is used by service routines to retain the 
return address of the requesting task. It also has 
machine usage when a translate and test instruction 
is executed. When not required for these purposes 
the register is available for general task use. 


92-95 


5B-5F 


Register 3 - resource address register 

Register 3 may contain the address of a resource 
control biock on which the task is at present waiting 
(task in L state). When not required for this purpose 
the register is available for general task use. 


96-99 


60-63 


Register 4 - work register 


100-103 


64-67 


Register 5 - work register 

If the task owns queue space, this register will address 
the queue record. 


104-107 


68-6B 


Work register (may address the DMB). 


108-111 


6C-6F 


Work register 

In an execution processor task this register addresses 
the user CCB . 


112-115 


70-73 


Work register 

In an execution processor task this register addresses 
current channel command. In a physical routine, it 
points to PWS. 


116-119 


74-77 


Base register for highest level of code used by task. 


120-123 


78-7B 


Restart information 

This field contains an action type code in byte and 
a value in bytes 1-3, as follows : 

Byte : 

X'04 1 restart at specified record (card or page) * 
X'08' skip forward specified number of records * 
X'OC skip back specified number of records * 

(* set by PRESTART command) 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



TCB - TASK REGISTER SAVE AREA (TRSA) (Continued) 



Bytes in TCB 


Description/ function of Fields in TRSA 


Dec 


Hex 






Restart "information (continued) 






Byte (continued): 






X'10' print specified number of pages (set by 

PSETUP command) 
X'14 1 restart a specified record (card or page) 

(set by PSTOP with RESTART option) 






Bytes 1-3 : 






The number of records (cards or pages) to be acted 






upon. 


124 


7C 


Device type code 


125 


7D 


Account track indicator 

This indicator is used by the task terminator phase 
(TR) to determine the appropriate action in case of 
an I/O error on the account file. 

It can contain the following : 

X'D6' O - Open for reading account file 

X'CT A - Caller active 

X'C7' G - Get in process 

X'C3' C - Close in process 

X'D2' K - Keep account file in process 

X'C5' E - Erase account file in process 

X'OO' - No entry active 

or 

X'40' j6 - No entry active 


126-127 


7E-7F 


Packed device address 



POWER/VS CONTROL BLOCKS (...CONTINUED) 

TQ3 - FILE CONTROL WORDS AND GENERAL TASK WORK AREA 

When the TCB belongs to a command processor task, this part of the TCB is 
replaced by the command processor control block (CPB). 



Bytes in TCB 


Description/ function of File Control Words and 
General Task Work Area 


Dec 


Hex 






I/O (disk or tape) request word for data file 


128-135 


80-87 


Data file seek address (MBBCCHHR) 

M = index into the module control load address 

table. 

For tape spooling, this 8 byte field is defined 
as follows : 

byte Tape fla (X'80') 

byte 1 Reserved 

bytes 2-3 Length field 

bytes 4-7 Address of tape control block 


136-139 


88-8B 


Real data area address ( see Note 3) 


140-143 


8C-8F 


Virtual data area address 






Blocking Control Words 


144-147 


90-93 


Residual count block 


148-151 


95-97 


Previous record address 






Record Control Word (formed from CCW) 


152 


98 


Record command code 


153-155 


99-9B 


Record address (virtual) 


156 


9C 


General purpo se byte 

X'00' = normal record 
X'02' = 3540 data record 
X'04' = end of data 
X'08' = break record 
X* 10" = end of block 
X'20' = end of 3540 data 

(note : bit 7 of this byte may be set to 1 to indicate 

data transfer or card motion is to be performed^ 


157 


9D 


Reserved 


158-159 


9E-9F 


Record length 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



TCB - FILE CONTROL WORDS AND GENERAL TASK WORK AREA (Continued) 



Bytes in TCB 






Dec 


Hex 


General Task Wor!< Area 






l/0(disk or tape) request word for queue file 


160-167 


A0-A7 


Queue file seek address 

For tape spooling, this 8 byte field is defined as 
follows : 






byte 
byte 1 
bytes 2-3 
bytes 4-7 


Tape flag 

Reserved 

Length field 

Address of tape control block 


168-171 


A8-AB 


Real queue space address (see Note 1) 


172-175 


AC-AF 


Virtual queue space address 


176-191 


BO-BF 


General Task Work area, may be broken into fields 
in whatever way is required by a task (for example, 
logical reader and writer work areas) 

It can also contain the 3540 communication byte : 

X'OI' = card reader with a 3540 attached 

X'02' = reading from 3540 

X'04' = 3540 data file processing. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
TCB - LINKAGE REGISTER SAVE AREAS (LRSA) 



When the TCB belongs to a command processor task, this part of the TCB is replaced 
by a command processor control block (CPB). 



Bytes in TCB 


Description/ function of Fields in LRSA 


Dec 


Hex 






Register Save Area 


192-195 


C0-C3 


Task control block address 


196-199 


C4-C7 


Previous save area address points to second of double 
LRSA 


200-203 


C8-B8 


Saved Register 14 


204-207 


CC-CF 


Saved Register 15 


208-211 


D0-D3 


Saved Register 


212-215 


D4-D7 


Saved Register 1 


216-219 


D8-DB 


Saved Register 2 


220-223 


DC-DF 


Saved Register 3 


224-227 


E0-E3 


Saved Register 4 


228-231 


E4-E7 


Saved Register 5 


232-235 


E8-EB 


Saved Register 6 


236-239 


EC-EF 


Saved Register 7 


240-243 


F0-F3 


Saved Register 8 


244-247 


F4-F7 


Saved Register 9 



Note 1 : The high-order byte of this field will contain the command code of 

the current or last executed operation. 

How to locate TCB : Chaining of TCB's via 'previous' and 'next' pointers, task 
selection list is delimited by the WCB. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



COMMAND PROCESSOR CONTROL BLOCK (CPB) 

This block replaces part of a command processor TCB, when a command is 
entered via the console keyboard by the central operator, and of its associated 
j temporary command processor TCB when linkage is made via the IPWSlCP macro. 

CPB replaces file control fields, general task work area, and LRSA of standard 
TCB. 

The contents of the CPB are described below : 



Bytes 




Description/ function of field 






Dec 


He* 




00-15 


00-0F 


Storage descriptor (CPB) 


16 


10 


RJF-userid ( for local) 


17-23 


11-17 


Command Code 


24-95 


18-5F 


Operands (free format) 


96-103 


60-67 


Sequence number (RJE only) 


104-107 


68-6B 


Address of caller ECB 


108-119 


6C-77 


Reserved 



How lo Locate : Displacements X'80' of the appropriate command processor TCB 
is the starting address of the CPB. 



POWER/VS CONTROL BLOCKS (...CONTINUE D) 
PHYSICAL WORK SPACE (PWS) 



Definition macro : IPW$DPW. 



Bytes 


Description/function of field 


Dec 


Hex 


00-03 


00-03 


I/O work space virtual address 

Virtual address of the work space which contains the 
command control block and the command chained 
channel command words and associated data buffers. 


04-07 


04-07 


Real address of the first CCW. 


08-11 


08 -0B 


Virtual address first data buffer. 

Virtual storage address of first data buffer allocated 

within the I/O work space area. 


12-15 


0C-0F 


Real address of first data buffer. 


16-19 


10-13 


Physical record length 

Physical record length of the device, to update the 

record pointer in the deblock routine. 


20 
21 

22-23 
24-119 


14 
15 

16-17 
18-77 


First byte not used. 

1 byte = device type of unit record device. 

2 bytes = LUB number. 
3540 extension 



How to Locate : Reg. 8 in the TCB for a task that uses a physical routine. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



LOGICAL DATA RECORD AREA (LDA) 



The format of a data record is shown below : 
12 3 4 



RL RL GP CC 



-if- 



How to Locate : Displ. X'88-8B' (I/O request words) of 
contains a pointer to the LDA. 



- Command code 

(for output U.R. device) 

- General purpose byte 
X'00' = normal record 
X'02' = 3540 data record 
X'04 1 = end of data 
X'08' = break record 
X'10' =end of block 
X'20' = end of 3540 dafa 

(Note : bit 7 of this byte may be set to 
to indicate data transfer or card motion 
is to be performed) 

Record length 

TCB for R/Wor XPtask 



POVVER/VS CONTROL BLOCKS (. . .CONTINUED) 
MODULE CONTROL BLOCK (MCB) 
Definition macro : IPW$DMC 



Description of Contents 



Bytes 


Description/function of field 


Dec 


Hex 


00-15 

16-23 
24-27 
28-31 


00-0F 

10-17 
18-1B 
1C-1F 


Storage descriptor MCB QFILE1 cuu (SYS001) 
Storage descriptor MCB DFILE2 cuu (SYS002) 
Storage descriptor MCB DFILE3 cuu (SYS003) 
Storage descriptor MCB DFILE4 cuu (SYS004) 
Storage descriptor MCB DFILES cuu (SYS005) 
Storage descriptor MCB DFILE6 cuu (SYS006) 
Storage descriptor MCB LFILE7 cuu (SSL) 
Storage descriptor MCB LFILE8 cuu (PVTSSL) 
Module seek address (MBBCCHHR) ® 
Reserved 
Lockword 






Command control block 


32-33 
34-35 
36-37 
38-39 
40-43 
44-47 


20-21 
22-23 
24-25 
26-27 
28-2B 
2C-2F 


Residual count 

Communication bytes 

Device status 

EXP real plus LUB index 

CCW address 

CCW address in CSW 






Extent information 


48-51 

52-55 

56 

57-59 

60-63 


30-33 

34-37 

38 

39-3B 

3C-3F 


Low limit (CCHH) 

High limit (CCHH) 

Sector value 

Reserved 

Sector table address 






Channel program 


64-71 

72-79 

80-87 

88-95 

96-103 

104-119 


40-47 
48-4F 
50-57 
58-5F 
60-67 
68-77 


Seek CCW 

Set sector or TIC CCW 

Search CCW 

TIC CCW 

Read or write CCW 

Reserved 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



MODULE CONTROL BLOCK (MCB) ( Continued) 



(T) Seek and search address required by the channel program. Whenever 

an input or output operation is to be performed it is updated from the 
seek address pointer in the I/O Request Word that controls the 
operation. 

How to Locate : 



Displ. X'60-63' of CAT contains poi 
X'64-67' 
X'68-6B' 
X'6C-6F' 
X 70-73' 
X'74-77' 
X'78-7B' 
X7C-7F' 



"nter to MCB Q files 


" 


Dfile 1 


• ' 


Dfile 2 


1 


Dfile 3 


1 


Dfile 4 


ii . 


Dfile 5 


' 


private SSL 


1 ' 


system SSL 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
TAPE CONTROL BLOCK (TBB) 
Definition macro : IPW$DTB 



Description of Contents 



Bytes 


Description/function of field 


Dec 


Hex 


00-15 
16-27 
28-31 


00-0F 
10-1B 
1C-1F 


Storage descriptor (TBB) 

Reserved 

Lockword 






Command control block 


32-33 
34-35 
36-37 
38-39 
40-43 
44-47 


20-21 
22-23 
24-25 
26-27 
28-2B 
2C-2F 


Residual count 
Communication byres 
Channel and device status 
EXCP real plus LUB index 
CCW address 
CCW address in CSW 


48-55 


30-37 


Write CCW 



How to Locate : Displ. X'84-87' and X'A4-A7' of TCB (when initialised for tape- 
spooling) contain pointers tc TBB. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



PAGE CONTROL BLOCK (PCB) 
Definition macro : IPWSDPC 



Bytes 


Description/function of field 


Dec 


Hex 


00-03 
04-07 

08-11 
12-15 

16-19 
20-23 


00-03 
04-07 

08-OB 
0C-0F 

10-13 
14-17 


Page real storage address 

Real storage address of the page described by this 

PCB. 

Previous page virtual address 

Virtual storage address of the previous page in the 
fixed page list. If the present page is the first page 
in the fixed page list the word is set to binary zeros. 

This page virtual address 

This fullword contains the virtual storage address of 

the page described by this page control block. 

Page control byte address 

Contains the virtual storage address of the byte within 
the storage assignment block in the storage control 
block which corresponds to the present page. 

First buffer address 

This fullword contains the virtual storage address of the 

first storage buffer within the present page. 

Next page virtual address 

This fullword contains the virtual storage address of 

the next page in the fixed page list. If the present 

page is the last page in the fixed page list the word 

is set to binary zeros. j 



r to locate :Each page in the fixable area starts v/ith this control block, which 
occupies the first 24 bytes of the page. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
BUFFER CONTROL WORD (BCW) 



Bytes 


Description/function of the field 


Dec 


Hex 


00-01 
02-03 

04-07 


00-01 
02-03 

04-07 


Length of previous buffer 

This hcnfword contains the binary length of the 
immediately-preceding storage buffer. If the buffer 
is in use its length is stored in twos complement 
form. If the buffer is not in use its length is stored 
in normal form. If the present buffer is the first in the 
page the word is set to binary zeros. 

Length of next buffer 

This halfword contains the binary length of the 
present storage buffer, that is, the buffer which 
immediately follows this buffer control word in 
storage. If the buffer is in use its length is stored 
in twos complement form. If the buffer is not in use 
its length is stored in normal form. If the preceding 
buffer is the last in the page the word is set to 
binary zeros. 

Owner (TCB virtual address) of next buffer. This 
fullword contains the address of the TCB belonging 
to the task which issued the request for buffer space. 
If a TCB is contained in the buffer, the owner address 
is that of the task which built the TCB. 



When a page is fixed in the fixable area, storage management 
assigns the first and last buffer control words. The first buffer control 
word is placed immediately after the page control block at the start 
of the page in real storage, and the last buffer control word is placed 
in the last two words of the page. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
PARTITION CONTROL BLOCK (PDB) 



Definition macro : IPWSDPD 



Bytes 


Description/function of fields 


Dec 


Hec 


00-15 
16-17 
18-19 
20-23 
24-27 
28-31 
32-35 
36-39 
40-47 


00-0F 
10-11 
12-13 
14-17 
18-1B 
1C-1F 
20-23 
24-27 
28-2F 


Storage descriptor (PDB) 

Reserved 

Partition identifier 

Number of entries 

Partition comreg address 

PIB address 

First entry address 

Boundary Box entry pointer 

Reserved 






Statistical information 

This information is destined for the execution 
account record and there Is a pointer to the SLI 
work area 


48-51 
52-55 
56-59 
60-61 
62-63 


30-33 
34-37 
38-3B 
3C-3D 
3E-3F 


Pointer to SLI work area 
Number of lines spooled 
Number of cards spooled 
Number of pages spooled 
Reserved 






3540 Spool device entry 


64-79 


40-4F 


Format same as for RDR device entry 






RDR device entry (maximum = 1) 


80-83 

84-87 
88-91 

92 
93 

94-95 


50-53 

54-57 
58-5B 

5C 
5D 

5E-5F 


Address of entry in the DOS/VS PUB for a card 

reader device 

Address of execution reader TCB 

CCB address. The first byte of this field is the SVC 

code : 

X'00' = SVC : I/O request by user program 
X'90 1 = SVC90 : accounting request by PA 
X'91 ' = SVC91 : accounting request by JCL 

Device type code 

Device class code 

Can be R = normal reader, or C = console 

Requestor ID 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
PARTITION CONTROL BLOCK (PDB) (Continued) 



Bytes 


Description/ function of fields 


Dec 


Hex 






LST device entry (maximum = 8) 


96-99 

100-103 
104-107 
108 
109 

110-111 


60-63 

64-67 
68-6B 
6C 
6D 

6E-6F 


Address of entry in the DOS/ VS PUB for a printer 

device 

Address of the execution list TCB 

CCB address 

Device type code 

For list device entry this can be L = device 

is being spooled, N =• device is not being spooled. 

Requestor ID 


Depends on number of 
LST entries 


PUN device entry (maximum = 8) 
(same format as LST device entry) 






Address of entry in the DOS/VS PUB for a punch 

device 

Address of the execution punch TCB 

CCB address 

Device type code 

For punch device entry this can be P = device is 

being spooled, N = device is not being spooled. 

Requestor ID 



Displ. X'AO - A3' of the partition comreg and R6 in TRSA 
of a TCB. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
QUEUE RECORD AREA (QRA) 



Definition macro : IPWSDQR 



Bytes 




Description/function of field 






Dec 


Hex 








Body Fields (first 96 bytes) 






The body of the queue record contains information 






pertinent to this particular queue entry and the 






user job which created it. 


00-07 


00-07 


Date 


08-11 


08-08 


Operation start time 


12-15 


0C-0F 


Operation end time 


16-31 


10-1F 


User information 


32-39 


20-27 


Job name 


40-41 


28-29 


Job number 


42 


2A 


Queue record identifier 


43 


2B 


POWER/VS cancel code 


44 


2C 


Line identifier or device type 


45-47 


20-2F 


Channel and unit (line address) 


48 


30 


From terminal identifier 


49 


31 


To terminal identifier 


50 


32 


Class 


51 


33 


Priority 


52-55 


34-37 


Record count 


56-57 


38-39 


Number of tracks 


58 


3A 


Job suffix number 


59 


3B 


Number of copies 


60-63 


3C-3F 


Forms identifier 


64-67 


40-43 


Number of additional records 


68-69 


44-45 


Number of pages 


70-71 


46-47 


Number of extra pages 


72-75 


48-4B 


Line/ card counter 


76-79 


4C-4F 


Restart page count 


80 


50 


Copies remaining 


81 


51 


Not used 


82 


52 


Disposition 


83 


53 


Number of separators 


84-87 


54-57 


Number of records before split 


88-91 


58-5B 


Maximum value of count 


92-95 


5C-5F 


Additional count value 


96-97 


60-61 


3540 Physical unit address in packed format 


98-103 


62-67 


Reserved 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
QUEUE RECORD AREA (QRA) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Control Fields (56 bytes) 

The control portion of the queue record contains 
information relating to the status of the queue record 
and to its position within the POWER/VS queues. 


104 

105 

106 

107-119 

120-127 

128-135 

136-143 

144-151 


68 

69 

6A 

6B-77 

78-7F 

80-87 

88-8F 

90-97 


Execution switch 
First in set switch 
Segmentation type 
Reserved 

Next record in set 
Previous set in queue 
Next set in queue 
First block of data 



Displ. X'A8-AB' of a TCB (not being Comm. proc. or Line manager 
TCB). 



SERVICE AIDS 



RJE I/O TRACE 



An I/O trace for an RJE line after SIGNON can be Initiated by 
specifying YES to TRACE=in the PRMT macro. 

Entries are made in a wraparound buffer in the phase IPW$$TM. 
The following informatipn is recorded at every l/O interrupt 
from this terminal. 



-32 byte 



Up to 127 
entries of 32 
bytes each. 
The last entry 
is followed by 
a blank line of 
32 bytes. Thus, 
the last few 
entries can 
easily be located 
in a dump of the 
buffer 



First 12 bytes Last CCW 
of CCB executed 



First four bytes in ^ — 
data buffer (includes 
line control characters) 



Trace entry 



The last line response 
L-f^sent or received from 
the terminal 

► Sense information 



Last four bytes of data 
♦buffer (includes TP control 
characters) 



5 



A data buffer with four 
records (Number of records 
in a data buffer depends 
on type of terminal). 



The trace is to be used when RJE line errors occur or incorrect output 
is encountered which can be caused by the I/O operation. 



POWER/VS FILE DUMP PROGRAM 

This program enables any of the POWER/VS files (account, queue, data) to be dumped 
on a line printer assigned to SYSLST. An option is also provided to enable queue 
records and their associated track groups belonging to specific jobs to be dumped. 

How to Execute 



The program is requested by JCL commands entered either via SYSLOG or SYSIN, 
where SYS IN is assigned to a card reader. Before requesting ensure relevant assignments 
are made for the file to be dumped. 



SERVICE AIDS (. . . Continued) 

POWER/VS FILE DUMP PROGRAM (. . .Continued) 



Example Job Stream 

//JOBname 

//ASSGN (SYS000 for Account file) 

(SYS001 for Queue file) 

(SYS002-6 for Data files) 
//EXEC IPW$$DD 

When the program is loaded successfully, the following message will be issued 
to SYS LOG: 

DUMP FUNCTION = 

At this point one of the following options can be entered via SYSLOG : 

A (to specify the Account file) 

O (to specify the Queue file) (T) 

D (to specify the Data file) 

Jobname (jobnumber) (, queue) (2) 

EOJ (to enable cancelation of the program or selection of a new option). 

(T) The complete data file will be dumped. 

(2) This enables (a) queue record(s) belonging to a specific job in the RDR, 
LST, or PUN queue plus its associated track group(s) to be dumped. 
Job name may be 8 characters, job number may be 6 characters. For the 
'queue' option one of the following three entries can be specified : 

L, for LST queue (default) 
P, for PUN queue 
R, for RDR queue. 

After the dump is completed, the message 

DUMP FUNCTION = 

is issued to SYSLOG again to enable either a new option to be specified or the 
program to be terminated by the option EOJ. 

Format of Output 

For every 100 bytes, a block of four lines is printed. Line 1 contains the printable 
characters in those bytes; line 2 contains the zone-part of each byte; line 3 contains 
the numeric part of each byte; line 4 contains a scale indicating the position of the 
bytes in the string. 

line!: CHAR // jqb POWJOB01 flATE TP/19/7U, 

line 2 : ZON 6R4DDC4DDEDDCFF^UUi4UUUU4UU imuurcFCUFFRFFRFFF 

line 3 : NUMR 1101R2n7S61R20innnononnnon r)nmui35nnpii917U?. 

H ne 4. 01. ..5. ..10. ..15. ..20. ..25. . 5 . . . QO . . . 95 
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(VTAM) 
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User Exit 
















AM 








PAB Q 
*7 






















Pageable 
Storage 


















System 
Save Area 






* Processing Sequence 










RPH 






System 
CRA 






User 
Save Area 






User 
RPH 






Storage 
Request 
RPH 






Dynamic 
PAB 





PROCESS SCHEDULING CONTROL BLOCK RELATIONSHIP (. . . .Cont'd) 



Oldest RPH 



t next PAB 



f next Work 
Element 



in 



Work Element Work Element 



Work Element Work Element 



» 



* Processing Sequence 



11-03 



ACB (iFGACB) 



Dec 




Hex 




12 


C 


16 


10 


20 


14 


24 


18 


28 


1C 


36 


24 


40 


28 


44 


2C 


48 


30 



ACB ID 
ACB 



ACBACT 
Active byte 
test & set 



ACBLEN 

ACB length in bytes 



ACBAMBL 
Pointer to AMBL 



ACBAMO 

Pointer to A^O code 



ACBJBUF 

Num fourndl buffers 



ACBIBUF 

Num Index buffers 



ACB DOS ID 
Simulate 
DOS DTF 



ACBOFLGS 
Open/close 
flags 



ACBDBUF 

Num data buffers 



ACBMACRF 
MACRF 



ACBNST 
Number of 
strings 



ACBERFLG 
F lags for O/C 
errors 



ACBAMBUF 

Core avail, for Buffs 



ACBDDNM 
DDNAME 



ACBPRTCT 
PRT to password 



ACBUAPTR 

PTR to user wrk area 



ACBBFPL 

Addr of DOS buff pool 



ACBEXLST 
Pointer to EXLST 



) 



ACB (IFGACB) (Continued) 



Dec Hex 
52 34 



ACBNXT 
Reserved 



ORG ACBLEN 



ORG ACBDBUF 



OR G ACB1BUF 



ACBLENG 

ACB length in bytes 



ACBBUFND 
Num data buffers 



ACBBUFNI 

Num index buffers 



ORG ACBMACRF 



ORG ACBMACRF+1 



ORG ACBNST 



ACBMACR1 
MACRF first 
byte 



ACBMACR2 
MACRF second 
byte 



ACBMACR2 
MACRF second 
byte 



Displacement list if fields in IFGACB 



Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


0000 


0000 


ACB ID 


0016 


0010 


ACBBUFNI 


0023 


0017 


ACBERFLG 


0001 


0001 


ACBACT 


0016 


0010 


ACBIBUF 


0024 


0018 


ACBAMBUF 


0002 


0002 


ACBLENG 


0018 


0012 


ACBMACR1 


0028 


001C 


ACBDDNM 


0002 


0002 


ACBLEN 


0018 


0012 


ACBMACRF 


0036 


0024 


ACBPRTCT 


0004 


0004 


ACBAMBL 


0019 


0013 


ACBMACR2 


0040 


0028 


ACBUAPTR 


0008 


0008 


ACBAM0 


0020 


0014 


ACBDOSID 


0044 


002C 


ACBBFPL 


0012 


oooc 


ACBJBUF 


0021 


0015 


ACBOFLGS 


0048 


0030 


ACBEXLST 


0014 


000E 


ACBBUFND 


0022 


0016 


ACBSTRNO 


0052 


0034 


ACBNXT 


0014 


000E 


ACBDBUF 


0022 


0016 


ACBNST 









ACB (IFGACB) (Continued) 



Alphabetical 


1 List off i 


elds in 


IFGACB 








Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec Hex 


ACBACT 


0001 


0001 


ACBDOSID 0020 


0014 


ACBMACR1 


0018 0012 


ACBAMBL 


0004 


0004 


ACBERFLG 0023 


0017 


ACBMACR2 


0019 0013 


ACBAMBUF 


0024 


0018 


ACBEXLST 0048 


0030 


ACBNST 


0022 0016 


ACBAMO 


0008 


0008 


ACBIBUF 0016 


0010 


ACBNXT 


0052 0034 


ACBBFPL 


0044 


002C 


ACB ID 0000 


0000 


ACBOFLGS 


0021 0015 


ACBBUFND 


0014 


000E 


ACBJBUF 0012 


oooc 


ACBPRTCT 


0036 0024 


ACBBUFNI 


0016 


0010 


ACBLEN 0002 


0002 


ACBSTRNO 


0022 0016 


ACBDBUF 


0014 


000E 


ACBLENG 0002 


0002 


ACBUAPTR 


0040 0028 


ACBDDNM 


0028 


00 1C 


ACBMACRF 0018 


0012 






F lags and masks 














Flag 


Contai 


ns 




Mask 


Value 


Means 




ACBMACR1 


MACRF first byte 


ACBKEY 


X'80' 


Access data via IX 










ACBADD 


X'40' 


Access w 


ithout IX 










ACBADR 


X'40' 


Access without IX 










ACBCNV 


X'20' 


Control i 


nterval proc. 










ACBSEQ 


X'10' 


Sequential Proc. 










ACBDIR 


X'08' 


Direct processing 










ACB IN 


X'04' 


Get, read 










ACBOUT 


X'02' 


Put, write 










ACBUBF 


x'or 


User buffers 


ACBMACR2 


MACRF second byte 


@NM00001 


X'CO' 


Reserved 












ACBSKP 


X'20' 


Skip seq 


accessing 










(3NM00002 


X'lF' 


Reserved 




ACBOFLGS. 


apen/close flags 




ACBVOLMT 


X'80' 


Verify volume mounted 










ACB VMS G 


X'40' 


Message 


requested bit 










ACBEOV 


X'20' 


EOV concatenation 










ACBOPEN 


X'10' 


ACB is open 










ACB CAT 


X'08' 


ACB for AM0 cat 










ACBEXFG 


X'04' 


User exit 


flag 










ACBJRNL 


X'02' 


JRNLwa 


s loaded by open 










ACBKEYOK 


X'01' 


Key proc 


. OK for this ACB 



ACDEB (ISTACDEB) 



Dec Hex 




ACDVTPRX 
VTAM DEV PREFIX SECTION 



ACDDBPFX 
VTAM DEB PREFIX SECTION 



ACDBASIC 
BASIC DEB SECTION 



ACDVTAM 
VTAM DEB SECTION 



ACDEB (ISTACDEB) (Continued) 



Dec Hex 
128 80 



ACDSIP 
SESSION CONTROL INBOUNF PAB 



ACDSOP 
SESSION CONTROL OLfTBOUND PAB 



ACDASFQ 
ADDR 1st FMCB ON DFASY ANY Q 



ACDREFQ 
ADDR 1st FMCB ON RESP ANY Q 



ORG ACDVTPRX 



ACDTYPE | 

CONTROL BLOCK 
TYPE | 



ORG ACDTYPE 




ACDOPNAD 
FIRST BYTE OF 
DEB FOR OPEN 



ORG ACDVTPRX+1 __ 

1 ACDL NGTH 



CONTROL BLOCK 
LENGTH IN BYTES 



ACDCHN 
CHAIN FIELD 



ACDTSKID 
TASK ID 



ACDSAF 
FLAGS 



11-08 



ACDEB (ISTACDEB) (Continued) 



Dec 


Hex 
C 










12 


ACDRSV08 
Reserved Preserve alignment 




Org 


ACDDBPFX 




16 


10 
14 


ACDRSV01 
Reserved 


20 


ACDLENG 
Length for 
OS 


ACDAMTYP 
Access method 
type for OS 


ACDRSV02 
Reserved 


ACDRSV03 
Reserved 




Org 


ACDBASIC 




24 


18 
1C 
20 

24 


ACDTCB 
Pointer to TCB owning this deb 


28 


ACDDEB 
Pointer to next deb in deb chain off TCB 


32 


ACDPRLEN 
Prefix length 


ACDDEBID 
Owner deb 
identification 


ACDRSV04 
Reserved 


36 


ACDACBAD 




Org 


ACDACBAD 




36 


24 


ACDRSV10 


ACDACB 

Ptr to appl ACB 




Org 


ACDVTAM 




40 


28 
2C 
30 
34 


ACDLOCK 
Deblock lock 


44 


ACDRDTE 
Pointer to RDT entry 


48 


ACDFMCB 
Addr of 1st FMCB on FMCB queue of this deb 


52 


ACDRAFQ 
Addr of 1st FMCB on readany FMCB que 



ACDEB (ISTACDEB) ( Continued) 



Dec Hex 
56 38 



60 3C 



ACDRARQ 
Addr of 1st RPL on readany RPL que 



ACDPSST 
Addr of the PSS table 



ACDRSV33 
Reserved 



ACDNEPAB 
PSS solicit/read any PAB 



ACDSSPAB 
PSS system services PAB 



ACDSSFLG 
System service 
flags 



Org ACDVTAMf65 



ACDRSV06 ACDRSV07 
Reserved Reserved 



U-ID 



ACDEB (ISTACDEB) ( Continued) 
Dec Hex 















ACDAPDAT 
Application - ID section 





Org ACDAPDAT 



ACDAPDLN 

Length of applicatioi 

ID data 



ACDAPDDT 
Application data 



116 74 
120 78 
124 7C 



Org ACDVTAM+76 



ACDCLDEB 
Close deb chain PTR 



ACDOCWAD 
Addr of OCW for use by close ACB 



ACDRSV11 
Reserved for alignment 



Displacement list of fields in ISTACDEB 



Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex Field 


0000 


0000 


ACDOPNAD 


0028 


00 1C 


ACDDEB 


0088 


0058 ACDS 


0000 


0000 


ACDTYPE 


0032 


0020 


ACDPRLEN 


0104 


0068 ACDS 


0000 


0000 


ACDVTPRX 


0033 


0021 


ACDDEBID 


0105 


0069 ACDR. 


0001 


0001 


ACDLNGTH 


0034 


0022 


ACDRSV04 


0106 


006A ACDR. 


0002 


0002 


ACDSAF 


0036 


0024 


ACDRSV10 


0107 


006B ACDA 


0004 


0004 


ACDCHN 


0036 


0024 


ACDACBAD 


0107 


006B ACDA 


0008 


0008 


ACDTSKID 


0037 


0025 


ACDACB 


0108 


006C ACDA 


0012 


oooc 


ACDRSV08 


0040 


0028 


ACDLOCK 


0116 


0074 ACDC 


0016 


0010 


ACDRSV01 


0040 


0028 


ACDVTAM 


0120 


0078 ACDO 


0016 


0010 


ACDDBPFX 


0044 


002C 


ACDRDTE 


0124 


0070 ACDR< 


0020 


0014 


ACDLENG 


0048 


0030 


ACDFMCB 


0128 


0080 ACDS 


0021 


0015 


ACDAMTYP 


0052 


0034 


ACDRAFQ 


0144 


0090 ACDS( 


0022 


0016 


ACDRSV02 


0056 


0038 


ACDRARQ 


0160 


00A0 ACDA 


0023 


0017 


ACDRSV03 


0060 


003C 


ACDPSST 


0164 


00A4 ACDRE 


0024 


0018 


ACDTCB 


0064 


0040 


ACDRSV33 






0024 


0018 


ACDBASIC 


0072 


0048 


ACDNEPAB 







ACDEB (ISTACDEB) ( Continued) 



Alphabetical list of fields in ISTACDEB 












Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


ACDACB 


0037 


0025 


ACDLOCK 


0040 


0028 


ACDRSV08 


0012 


oooc 


ACDACBAD 


0036 


0024 


ACDNEPAB 


0072 


0048 


ACDRSV10 


0036 


0024 


ACDAMTYPE 


0021 


0015 


ACDOCWAD 


0120 


0078 


ACDRSV11 


0124 


007C 


ACDAPDAT 


0107 


006B 


ACDOPNAD 


0000 


0000 


ACDRSV33 


0064 


0040 


ACDAPDDT 


0108 


006C 


ACDPRLEN 


0032 


0020 


ACDSAF 


0002 


0002 


ACDAPDLN 


0107 


006B 


ACDPSST 


0060 


003C 


ACDSIP 


0128 


0080 


ACDASFQ 


0160 


00A0 


ACDRAFQ 


0052 


0034 


ACDSOP 


0144 


0090 


ACDBASIC 


0024 


0018 


ACDRARQ 


0056 


0038 


ACDSSFLG 


0104 


0068 


ACDCHN 


0004 


0004 


ACDRDTE 


0044 


002C 


ACDSSPAB 


0088 


0058 


ACDCLDEB 


0116 


0074 


ACDREFQ 


0164 


00A4 


ACDTCB 


0024 


0018 


ACDDBFX 


0016 


0010 


ACDRSV01 


0016 


0010 


ACDTSKID 


0008 


0008 


ACDDEB 


0028 


001C 


ACDRSV02 


0022 


0016 


ACDTYPE 


0000 


0000 


ACDDEBID 


0033 


0021 


ACDRSV03 


0023 


0017 


ACDVTAM 


0040 


0028 


ACDFMCB 


0048 


0030 


ACDRSV04 


0034 


0022 


ACDVTPRX 


0000 


0000 


ACDLENG 


0020 


0014 


ACDRSV06 


0105 


0069 








ACDLNGTH 


0001 


0001 


ACDR SV07 


0106 


006A 








F lags and Masks 
















Flag 


Contai 


ns 


Mask 




Value 


Means 






ACDSSFLG 


System 


service 


: flags ACDCACB 


X'80' 


Close ACB in progress 








ACDABEND 


X'40' 


Abend in 


progress 










ACDA1CLS 


X'20' 


Close issued in ISTRAAA1 








ACDRSV09 


X'lF' 


Reserved 






Constants in ISTACDEB 














Label 


Value 


Meaning 












ACDID 


X'OF' 


VTAM Data Extent Block ID 









APT (I5TAOT) 



Dec 


Hex 



4 

8 
C 





1 


2 


3 





AOTAPT 
Pointer to APT for this task 


4 


AOTCNT 
Count of open 
ACBs for this 
task 


AOTDSBYT 
Used by 
ISTAPCAS to 
disable via 
STNSM 


AOTRSV02 
Reserved 


8 


AOTRSV03 
Reserved 


12 


AOTFLAGB 
Flags 


AOTRSV04 
Reserved 



AOTFLAGA 
Flags 



ORG AOTAPT + 1 



AOTAPTA 
Same as AOTAPT 



Flags and masks 



Disp. Flag Conta? 

0(0) AOTFLAGA Flags 



Mask 


Value 


Means 


AOTCAP 


X'80' 


DOS dispatcher call to 
ISTAPCAS needed 


AOTRSV01 


X'7F' 


Reserved 


AOTDUMP 


X'40 1 


Dump taken on termination 
used only in a main tas 


AOTCNCL 


X'20' 


Cancel posponed for APS 
to finish. 


AOTVTPLY 


X'10' 


Timer exit delayed. 


AOTUE 


X'08' 


User exit processing 


AOTVTSVC 


X'04' 


VTAM SVC 53 or SVC 49 


AOTSWAP 


X'02' 


VTAM process dispatching 


AOTSKEY 


x-or 


Supervisor key forced for 
this task by VTAM. 



APT (1STAPT) 



Dec 


Hex 



4 

8 

C 

10 

14 





1 


2 


3 





APTAPTX 
Pointer to pagable portion of APT 


4 


APTRPH 
Posted RPH queue anchor 


8 


APTPAB 
Scheduled PAB queue anchor 


12 


APTUECB 
Scheduled user exit queue anchor 


16 


APTWAIT 
Waiting RPH queue anchor 


20 


APTPI3 
Pointer to PIB for task 



ORG APTAPTX 



APTFLAGA 
Flags 



ORG APTAPTX+1 



APTAPTXA 
Same as APTSPTX 



NM00018 


AptpAbA 


Flags in CS 


Same as APTPAB 


operation 





Flags and Masks 
Disp. Flag 



0(0) APTFLAGA Flags 



APTRPHBY 


X'80' 


Pre-al located RPH 
is in use 


APTSUSP 


X'40' 


Waiting for storage 
request 


APTVSKEY 


X'20' 


Status of supervisor 
key bit on entry 
for VTAM Pro 


APTUSKEY 


X'10' 


Same for user exits 


APTUE 


X'08' 


User exit being 
processed 


APTRSV01 


X'07' 


Reserved 



APTX (ISTAPTX) 
Dec Hex 







APTHDR 
Dummy header 



APTCHAIN 
Chaining field 



APTTSKID 
Task ID of this task 



APTXTSV1 
Reserved 



APTXPAB 
PAB for TPIO spec scheduling 



APTSAVEV 
Save area for VTAM process dispatching 



APTSAVEU 
Save area for user exit dispatching 



APTXRPH 
Pre-allocated RPH for VTAM process dispatching 



APTXCRA 
CRA for above RPH 



APTSMRPH 
RPH for storage request 



APTX (1STAPTX) (...Continued) 






1 


2 


3 


APTADRR 
Range of storage for this partition 



APTTYPE 
Control Block 
Type 



APTXRSVO 
Reserved 



APTLNGTH 
Length of ISTAPTX 



APTADRS 
Start of range 



APTADRE 
End of range 



Constants in ISTAPTX 



Label Value 

APTXTYP XM6' 



Meaning 

Setting value for type 



i ATCVT (ISTATCVT) 



Dec Hex 




268 IOC 



280 118 

284 11C 

288 120 

292 124 

296 128 

300 12C 

304 130 



ATCCOM 
System Independent Fields 



AT CM AX ID 
Maximum number 
of major nodes 
0= number of 



ATCRSV16 
not used 



ATCMNT 
PTR to major node table - set by Sys.Def.Ref. by IS 



ATCCDADD 
PTR to CIDADD routine ISTSDDCA ref . by CIDCTL maa 



ATCCDDEL 
PTR to CIDDEL routine ISTSDCCD ref. by CIDCTL macro 



ATCCDFND 
Ptr to CIDFND routine IATSDCCF ref. by CIDCTL maa 



ATCESC01 
PTRtoESCOl 



ATCESC02 
PTR to ESC02 



ATCCSMR 
PTR to connection services master routine 



ATCOCRT 
PTR to open/close routir 



ATCUEP 
Pointer to user exit 



ATCVT (ISTATCVT) ( Continued) 
Dec Hex 



320 140 

324 144 

328 148 

332 14C 

336 150 

340 154 

344 158 

348 15C 

352 160 

356 164 



ATCSHRTN 
Name of VTAM shared RTN to be loaded 



ATCSHRFG 
Attribute flags 



ATCXRANG 
Number of bits 
in X-value 
portion of CI 



ATCSAF 
Sub area address field 



ATCEPA 
Entry point addr of loaded 



ATCALERT 
Pointer to alert-routine ISTSDCAL 



ATCDVLOD 
Pointer to ISTSDCOD 



ATCTRCPT 
Pointer to trace parm list 



ATCDVT 
Pointer to first dvt on chain 



ATCEPT 
Pointer to first EPT on chain 



ATCMSGP 
Pointer to TPMSG processor 



ATCMSGM 
Pointer to TPMSG - message CSECT 



ATCTRPAB 
Address of trace writer pab 



ATCVTLOD 
Address of VTAM load list 



ATCVT (ISTATCVT) ( Continued ) 
Dec Hex 



360 168 

) 364 16C 

368 170 

372 174 



380 17C 

384 180 

388 184 

392 188 

396 18C 

400 190 

404 194 

408 198 



ATCECPRT 
ECB for trace file print 



ATCZDVTB 
Address of ISTZCFBI 



ATCECTLP 
TOLTEP ECB 



ATCRVCHS 
Reserved 



ATCCRME 
Vary PSS control mechanism 



ATCHPGM 
Buffer information 



ATCDEBCH 
Close DEB chain Pointer 



ATCTODVT 
The TOLTEP dvt ptr pointed to by 3rd word of pab 



AT CADE L 
A delete routine address 



ATCCDPTR 
Pointer to ISTOCCCD- DOS only 



ATCLDNCS 
Pointer to NCSPL for load/dump 



ATCLDECB 
ECB fo load/dump subtask 



ATCVT (ISTATCVT) ( Continued) 



Dec Hex 
412 19C 



444 
448 



456 
460 



1BC 
ICO 



472 
476 



1D4 
IDS 



ATCRSV99 
Reserved for later pointers 



ATCAP33 
Pointer to ISTAPC33 



ATCAP35 
Pointer to ISTAPC35 



ATCAP36 
Pointer to ISTAPC36 



ATCDVTLK 
Lock word for DVT lock 



ATCCDFIN 
Pointer to ISTSDCRR 



ATCCDFDN 
Pointer to ISTSDCCN 



ATCVOCLK 
VOCLOCK lock 



ATCRDTLK 
RDTLOCK lock 



ATCRSV97 
DWORD alignment 



ATCVT (1STATCVT) ( Continued) 



Dec Hex 
480 1E0 



576 240 

580 244 

584 248 

588 24C 



ATCVPABl 
PAB for vary under PSS Control 



ATCPGPAB 
ERP PAB for purge 



ATCDLRPB 
Dump load & restart PAB 



ATCCCLAD 
Address of vary ERP (ISTINCCL) 



ATCCDLAD 
Address of vary dump, LD rstrt (ISTINCDL) 



ATCOCCOB 
Address ISTOCCOB 



ATCOCCCB 
Address ISTOCCCB 



11-21 



ATCVT (ISTATCVT) ( Continued) 



Dec Hex 
592 250 



ATCTIPAB 
A pab for ISTOLTP 



ATCTCIPB 
A pab for TOLTEP CLIP 



ATCVTIPB 
A pab for TOLTEP - VTAM interface 



ATCTCLOM 
Addr TOLTEP CLOP proc. 



11-22 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 

692 2B4 



ATCTCLIM 
Addr TOLTEP Clip proc. 



ATCVTINM 
Addr TOLTEP-VTAM Intf proc. 



ATCTACB 
Toltep ACB 



ATCRSV10 
Reserved 



ATCCFEAD 
Addr of ISTINCFE 



ATCVLCNT 
Vary device online counts 



ATCS49XI 
Address of ISTPICXI 



ATCS49XL 
Address of ISTPICXL 



ATCVT (ISATCVT) ( Continued) 
Dec Hex 



784 310 



812 32C 



ATCPTR05 
Reserved 



ATCPTR06 
Reserved 



ATCSOPD 
Session Control 



ATCSIPD 
Session Control 



ATCSECST 
Session Controlsess Term 



ATCVDPAB 
SSCP SYSDEF PAB 



ATCVT (ISATCVT) ( Continued) 



Defc Hex 
848 350 



880 370 
884 374 



ATCVFPAB 
SSCP front end PAB 



ATCVDLOK 
SSCP Serialization Lock 



ATCDOS 
DOS Only fields 



Org ATCCOM 



ATCSTAT 
VTAM Status Indicators 



Org ATCSTAT 



ATCSTAT1 
VTAM Status 
byte 1 



Org ATCSTAT+1 



Org ATCSTAT+2 



Org ATCCOM+4 



ATCSTFLG 
Storage 
Management 
flags 



ATCSTAT2 
Reserved 


ATCSTAT4 
VTAM Status 
byte 4 



ATCAPI 
Addr of API routine 



11-25 



ATCVT (ISATCVT) ( Continued) 
Dec Hex 



48 30 



ATCDCFRR 
Pointer to FRR of control layer, initialized by opend 



ATCRDT 
Pointer to first RDT 



ATCSRT 
Pointer to SRT directory 



ATCRSV70 
Reserved 



ATCECMOD 
ECB for modify command proc. 



ATCMODQ 
Pointer for output queue for modify command 



ATCECHLT 
ECB for halt command 



ATCHALTQ 
Pointer to output queue for halt command 



ATCECVRY 
ECB for vary command proc. 



ATCVARYQ 
Pointer to output queue for vary command 



ATCECDSP 
ECB for display command 



ATCDSPLQ 
Pointer to output queue for display command 



ATCOCHA 
Pointer to OCT header 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 
60 3C 



84 54 



100 64 
104 68 

108 6C 



ATCECSES 
ECB to Halt Session Mode 



ATCECVRQ 
3 ECB for Vary Req. Info. Request Notification 



ATCVPARM 
Address of Vary Parameters 



ATCECOPC 
ECB to Indicate Operator Control Processing Complete 



ATCECNET 
ERP ECB for Network Configuration Request 



ATCECPRM 
Pointer to QAB for ERP's ECB Parameters 



ATCHLTMS 
Pointer to Halt Command or Halt Return Message 



ATCFSB 
Pointer to Feedback Status Block 



ATCRSV71 
Reserved 



ATCRDTH 
Pointer RDT Header 



ATCACCTA 
Pointer to Installation Accounting Routine 



ATCAUTHA 
Pointer to Installation Authorisation Routine 



ATCPTCHA 
Pointer to VTAM Patch Area 



ATCVT (1SATCVT) ( Continued) 



Dec Hex 

112 70 

116 74 

120 78 

124 7C 

128 80 



ATCCONFT 
Pointer to VTAM Configuration-Table 



ATCFDVT 
Pointer to first DVT for O/C 



ATCFEPT 
Pointer to first EPT for O/C 



ATCDVTPT 
Address of load mod for type = VTAM tracing 



ATCBPDA 
Pointer to buffer pool directory 



ATCADD 
Pointer to ADD procedure 



ATCREMOV 
Pointer to remove procedure 



ATCIOTRC 
Pointer to I/O trace procedure 



Ora ATCIOTRC 



ATCTHTRC 
Addr of TH trace routine 



Or g ATCTHTRC 



ATCTPBUF 
TPIOS buffer trace (ISTRARTP) 



Org ATCCOM+144 



ATCBFTRC 
Pointer to buffer trace procedure 



ATCFBRPH 
Addr of feedback proc RPH 



ATCBLDLA 
Addr of BLDL routine 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 
156 9C 



ATCALOAD 
Addr of Aload Routine 



ATCREADA 
Addr of Source Read Routine 



ATCGTSTR 
Addr of Getstor Routine 



ATCFRSTR 
Addr of Freestor Routine 



ATCSTMA 
Addr of SM Initialization Routine 



ATCACDA 
Addr of First ACDEB 



ATCSMRQ 
Addr of Request Storage Routine 



ATCSMQU 
Addr of Queue Request Rtne - DOS only 



ATCSMRS 
Addr of Release Storage Routine 



ATCSMRC 
Addr of Recover Storage Routine - DOS only 



ATCSMBQ 
Pointer to Q'ed Req. SMS Routine 



ATCFIRA 
Addr of Feedback Initiation RPH 



ATCSRTAD 
Pointer to SRTADD routine 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 
208 DO 



ATCSRTDF 
Pointer to Setdele Routine 



ATCDCC60 
Pointer to ISTDCC60 - Ctl. layer move to user area 



ATCDCC61 
Pointer to ISTDCC61 - Ctl. layer move fixed to pagable 



ATCNERST 
Pointer to ISTDCC00 - Request - ST 



ATCNERCV 
Pointer to ISTRCC21 - Receive OB 



ATCNERNE 
Pointer to ISTDCC25 - Read - ANY 



ATCNERFN 
Pointer to ISTDCC02 - Request - FN 



ATCAPOST 
Pointer to VTAM Post Routine 



ATCVTMID 
Host major node I.D. 



ATCRSV11 
Reserved 



ATCRCC63 
HSKPANYQ Pointer 



ATCRCC26 
Send Response Pointer 



ATCRCC65 
Set RPL Pointer 



ATCNESAL 
Pointer to ISTDCC24 - Solicit - All 



ATCVT (ISATCVT) ( Continued) 



Dec 


Hex 
104 

108 

IOC 

Org 
128 

Org 
180 

Org 
304 

Org 
318 

31C 

Org 
320 

324 

328 

Org 
32C 










260 


ATCNERAP 
Pointer ro ISTDCC85 - Read Any Purge 


264 


ATCACTRM 
Count of Active Terminals 


ATCCIDM 
CID Mask 


268 


ATCMSGSP- 
Reserved for 
msg surpress 

ATCCSMR 




296 


ATCCSMA 
Pointer to connection Service Master Routine 




ATCHPGM 


384 


ATCHBFNO 
Number of buffs for 
channel 


ATCHBSIZ 
Buffer size in bytes 




ATCVLCNT 


772 


ATCRNCNT 
370X Count 


ATCLCLCT 
3270 Count 




ATCSOPD 


792 


ATCSEC01 
Outbound processing 


796 


ATCSEC10 
DVT 




ATCSIPD 


800 


ATCSEC21 
Inbound processing 


804 


ATCSEC30 
Feedback 


808 


ATCSEC40 
DVT 




ATCSECST 


812 


ATCSEC51 
Recovery DVT 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 

884 374 

888 378 

892 37C 



900 384 



916 394 

920 398 

924 39C 

928 3A0 

932 3A4 



Org ATCDOS 



ATCPRTYQ 
Priority msg queue anchor 



ATCSYSCN 
Addr of SYSCON Routine 



ATCCIBPL 
Addr of Lib Pool 



ATCOACBA 
Addr of open ACB Routine 



ATCCACBA 
Addr of close ACB Routir 



ATCTET 
Addr of VTAM TET 



ATCTETC 
Addr of current task entry in TET 



ATCSV53T 
Addr of function table for SVC53T 



ATCSCHRT 
Address of return to Asynchronous Processing 



ATCAPESH 
Address of module to schedule a PAB (ISTAPESH) 



ATCAPESE 
Address of ISTAPESE 



ATCSTATA 
Address of local device status collector 



ATCLAHRA 
Address of local 3270 attention handler RPH 



ATCVT (ISATCVT) ( Continued) 



Dec 


Hex 
3A8 

3AC 

3B0 

3B4 
3B8 
3BC 

428 










936 


ATCRSV72 

Reserved 


940 


ATCSRPAB 
System reset PAB address 


944 


ATCINBA 
Address of system console input buffer 


948 


ATCECBA 
Address of system console input EC 


952 


ATCFQE 
Pointer to primed queue elements 


956 


: ATCEIRPH : 
RPL header for activating error msg writer 


1064 


ATCINDIC 
Reserved 


ATCFLAGS 
Flag byte 







Org ATCDOS+182 



1066 


42A 
42C 
430 
434 




ATCSVC33 
SVC 33 Instruction 


1068 


ATCFLDA 
Start of fixed area 


1072 


ATCDTFBL 
DTF builder routine address 


1076 


ATCTIMER 
Timer subroutine address 



ATCVT (1SATCVT) ( Continued) 



Dec 


Hex 
438 

43C 

44C 

444 

448 

Org 
448 

Org 
44C 

450 










1080 


ATCR7SVE 
Save R7 for ISTAPEAS 


1084 


ATCGVPAG 
Address of pageable area in GETVIS region 


1088 


Pointer to ISTDC 


ATCDCC3X 
X3X - Ext to ISTDCC30 for performance 


1092 


ATCRVPTD 
Reserved 


1096 


ATCNSECB 
ECB for attaching NETSOL 




ATCNSECB 




1096 


ATCNSPAD 
Aligment 


ATCNSRC 
Return code 




ATCDOS+216 




1100 


ATCNRMQ 
Normal msg queue anchor 


1104 


ATCFESS 
Reserved 



ATCVT (ISTATCVT) (continued) 



Flags and Masks 










Disp. 


Flag 


Contains 


Mask 


Value 


Means 


1065 


ATCF LAGS 


Flag byte 


ATCSTOPP 


X'80' 


Msg recepit flag 


(429) 






ATCRNLUB 


X'40' 


LUB is unassigned 








ATCRSV02 


X'3F' 


Reserved 


316 


ATCSHRFG 


Attribute flags 


ATCLAST 


X'80 1 


Indicate HTIS is 


(13C) 










last module 


0(0) 


ATCSTAT1 


VTAM status 


ATCSTART 


X'80' 


VTAM is starting 






byte 1 


ATCACTIV 


X'40' 


VTAM is active 








ATCSNHLT 


X'20' 


VTAM session halt 








ATCQKHLT 


X'10' 


VTAM quick halt 








ATCNETSL 


X'08' 


Netsol = yes specified 
on CMD 








0NMOOO22 


X'07' 


Reserved 


3(3) 


ATCSTAT4 


VTAM status 
byte 4 


ATCPRTAT 


X'80' 


1 = trace print active, 
= not active 








ATCTPRT 


X'40 1 


When 1, tprint in 
process 








ATCMTST 


X'20' 


When 1, modify test 
in process 








ATCNCSD 


X'10' 


NCS quiesced during 
halt 








ATCRSV04 


X'OF' 


Reserved 


KD 


ATCSTFIG 


Storage management 
flags 


ATCHSDMF 


X'80' 


System slow down flag 



AVT 


ISTAVT 
Hex 

4 
8 
C 
10 
14 
18 
1C 
20 
24 

and mas 
Flag 
ISTAS 


) 








Dec 





1 


2 


3 





ISTACVT 
Address of VTAM CVT 


4 


ISTAS49 
Address of SVC 49 Code 


8 


ISTAS53 
Address of SVC 53 code 


12 


ISTAPSTA 
Address of APS table 


16 


ISTTSTSZ 
Not used 


ISTVTTIK 
VTAMRP Task ID 


20 


ISTAPSEX 
Address of APS exit 


24 


ISTPHNM 
Phase name of transient 


28 




ISTX1 
Test field 


ISTARID 
Address of RID 


32 


ISTATRT 
Address of VTAM gates in RETAf 


ISTAGTWT 
Address of GATEWAIT routine 


36 


ISTVTTP 
Address of code to check for 
pending timer interrupt 




Flags 
Disp 
4(4) 


cs 

Contains 

49 Address of 
Code 


Mask 

SVC49 

ISTAH 


Value Means 
IP X'80' Halt in progress 



BPD (ISTBPDIR - BUFFER POOL DIRECTORY) 



Dec Hex 




12 C 

16 10 

20 14 

24 18 

28 1C 

32 20 

36 24 

40 28 

44 2C 

48 30 



BPDIDSFA 
Buffer Pool ID for SFA 



BPDIRSFA 
A (Small Fixed Pool) 



BPDIDLFA 
Buffer Pool ID for LFA 



BPDIRLFA 
A (Large Fixed Pool) 



BPDIDSPA 
Buffer Pool ID for SPA 



BPDIRSPA 
A (Small Pageable Pool) 



BPDIDLPA 
Buffer Pool ID for LPA 



BPDIRLPA 
A (Large Pageable Pool) 



BPDIDAPA 
Buffer Pool ID for ACE/ ICE 



BPDIRAPA 
Addr. CE/ICE Pool 

BPDIDWPA 
Buffer Pool ID for WS FMCB 

BPDIRWPA 
Addr. WS FMCB Pool 

BPDIDPPA 
Buffer Pool ID for PD 



BPD (ISTBPDIR -BUFFER POOL DIREaORY) ( Continued) 



Dec Hex 
52 34 



BPDIRPPA 
Addr Pageable Data Bof Pool 



BPDIDNPA 
Buffer Pool ID for NW FMCB 



BPDIRNPA 
Addr Non-Working Set FMCB Buffer Pool 



BPDIRVFA 
A (Variable Buffer Length Fixed Pool) 



BPDIRVPA 
A (Variable Buffer Length Pageable Pool) 



Displacement List of Fields in ISTBPDIR 

Dec Hex Field Dec Hex Field 



Dec Hex 



Field 



0000 0000 BPDIDSFA 

0004 0004 BPDIRSFA 

0008 0008 BPD ID LF A 

0012 000C BPDIRLFA 

0016 0010 BPDIDSPA 

0020 0014 BPDIRSPA 



0024 0018 BPDIDLPA 

0028 001C BPDIRLPA 

0032 0020 BPDIDAPA 

0036 0024 BPDIRAPA 

0040 0028 BPDIDWPA 

0044 002C BPDIRWPA 



0048 0030 BPDIDPPA 

0052 0034 BPDIRPPA 

0056 0038 BPDIDNPA 

0060 003C BPDIRNPA 

0064 0040 BPDIRVFA 

0068 0044 BPDIRVPA 



Alphabetical List of Fields in ISTBPDIR 



Field 

BPDIDAPA 

BPDIDLFA 

BPDIDLPA 

BPDIDNPA 

BPDIDPPA 



Dec Hex Field 

0032 0020 BPDIDSPA 

0008 0008 BPDIDWPA 

0024 0018 BPDIRAPA 

0056 0038 BPDIRLFA 

0048 0030 BPDIRLPA 



Dec Hex Field 

0016 0010 BPDIRPPA 

0040 0028 BPDIRSFA 

0036 0024 BPDIRSPA 

0012 000C BPDIRVFA 

0028 00 1C BPDIRVPA 



Dec Hex 

0052 0034 

0004 0004 

0020 0014 

0064 0040 

0068 0044 



BPDIDSFA 0000 0000 BPDIRNPA 0060 003C BPDIRWPA 0044 002C 



BTU (ISTBTU) 
Dec He: 



BTUFOTHA 

1st and 2nd bytes 



BTUBTH 
BTH fields 



BDUCOUNT 
Count of data in RU 



BTUFORHA (Cont) 



BTUBDU 
BDU fields 



T_ 



BTUFORHA 
Three RH bytes 



BTUTEXT 
Start of text (Variable length) 



J 



ORG BTUFOTHA 



BTUFOTHB 



BTUDEST 
Destination nan 



ORG BTUBTH+2 



BTUSORCE 
Source name 



ORG BTUSORCE 



BTUXDAF 
Inbound source = DSB DAF 



ORG BTUBTH+4 



ORG BTUREQfl 



BTUXSAF 
Inbound dest = DSB DAF 



BTUREO 
Request TAG 



BTUROFLG 
Flag byte 



Request sequence 



BTU (ISTBTU) (...Continued) 



12 3 



ORG BTUFORHA 



BTUFORHB (Cont.) 



Flags and Masks 
Disp. Flag 



0(0) BTUFOTHB 

6(6) BTURQFLG Flag byte 



BTUFID 


X'FO 


Format ID 


BTURFIND 


X'80 


Request feedback 
indicator 


3TUACIND 


X'40 


Additional command 
indicator 


BTUFFIND 


X'20 


Function flag 
generated 


BTULBIND 


X'10 


Last block indicator 


BTUNONCB 


X'08 


No NCB for this 
request 


BTUINPET 


X'04 


Invite perpetual 


BTUASBTU 


X'02 


Associated BTU to 
come 


BTUDTRCE 


X'01 


Device trace 
requested 



Constants in ISTBTU 



Label 



Value 



BTUDR X'OA' 

BTUTHCON X'OEOO' 

BTURHCON X'039000' 

BTUODCF 10 



Meaning 

MDR Identifier in SYS resp byte 

FIDO TH 

FIDO RH 

Difference between BDU and the count fields. 



CCB 


(ISTCCB 












Dec 


Hex 


4 
8 
C 













CCBCNT 
Residual Count 


CCB COM 1 
First 

Communication 
byte 


CCB COM2 

Communication 
byte 


4 


CCBSTA 
CSW status 


CCBCLS 
CCB class 


CCBPUBNO 
Pub no in table 


8 


CCBCCW 
CCW address 


12 


CCBCOM3 
Third 

Communication 
byte 


CCBCHAP 
Address of Channel Appendage 




Org 


CCBCCW 




8 


8 


CGBLIOCS 
LIOCS flags 


CCBCPAD 
Real Address of CCW 


Displacement- 
Dec Hex 


ist of Fields in IS 
Field [ 


TCCB 
)ec 


Hex Field Dec 


Hex Field 



0000 0000 CCBCNT 

0002 0002 CCB COM 1 

0003 0003 CCB COM2 

0004 0004 CCBSTA 



0006 0006 CCBCLS 0009 0009 CCBCPAD 

0007 0007 CCBPUBNO 0012 000C CCB COM3 

0008 0008 CCB LIOCS 0013 000D CCBCHAP 
0008 0008 CCBCCW 



Alphabetical List of Fields in ISTCCB 
Field Dec. Hex Field 



Dec Hex 



Field 



Dec Hex 



CCBCCW 0008 0008 CCB COM 1 

CCBCHAP 0013 000D CCBCOM2 

CCBCLS 0006 0006 CCBCOM3 

CCBCNT 0000 0000 CCBCPAD 



0002 0002 CCB LIOCS 0008 0008 

0003 0003 CCBPUBNO 0007 0007 
0012 000C CCBSTA 0004 0004 
0009 0009 



Flags and Masks 








Flag 


Contains 


Mask 


Value 


Means 


CCBCLS 


CCB Class 


CCBREAL 


X'80' 


Real CCB 






ONM00005 


X7F' 


Reserved 


CCB COM 1 


First Communicatior 


CCBTRABT 


X'80' 


CCB Traffic Bit 




Byte 


©NM00004 


X'40' 


Reserved 






CCBDISER 


X'20' 


CCB Disaster Bit Area 



CNCB (ISTICNCB) 
Dec Hex 




44 2C 

48 30 

52 34 

56 38 

60 3C 

64 40 



88 58 

92 5C 

96 60 

100 64 

104 68 



ICNFLAG 
3705 flag byte 



ICNCB 
Common NCB header 



ICNCUUA 
UCB/PUB address 



ICNCPQ 
Addr. channel Program queue 



ICNSIOQ 
Addr. of queue of write CCWS 



ICNSLOWQ 
Addr. of queue or RPLS 



ICNLAST 
Fword PTR to last CCW 



ICNFLG2 
F lag byte 



ICNRSV02 
Reserved 



ICNERPWE 
Work element for ERP interface 



ICNORGCP 
Address of original channel PGM 



ICNCPSV 
Save area for address of CP 



ICNBUFF 
3705 read buffer request 



LCNVCPAD 
Virtual address of CP 



ICNVFCCW 
Virtual add. of failing CCW 



CNCB (IST1CNCB) (continued) 



Dec Hex 
108 6C 



ICNTECT 
Temp error count 



ICN USAGE 
SIO counter 



ICNRSCCW 
Read start' CCW 



ICNRSTIC 
TIC to actual read CP 



ICNWSCCW 
write start CCW 



ICNWSTIC 
TIC to actual write CP 



ICNUDPAB 
PAB for unsolicited 3705 Data 



ICNCCB 
Command control block 



ORG INCLAST 



60 3C ICNRDFL 

Read CCWS flag 



ICNLSTBL 
Pointer to last CCW 



CNCB (ISTICNCB) (continued) 



12 3 



OR G ICNERPWE 



ICNTYPE 
Type code for 
head of ICNCB 



ICNRCODE 
Return code 



ORG ICNERPWE + 3 



71 47 

72 48 
76 4C 



ICNSENSE 
Sense byte 



ORG ICNERPWE + X7 _ 



ORGJCNTECT 



ICNZX001 
VS/1 alias 



ORG ICNUSAGE 



ORG ICNRSCCW 



ORG ICNRSTIC 



ORG ICNWSCCW 



ORG ICNWSTIC 



ICNERAa 
Action code 



ICNERCOD 
Error code 



ICNLNK 
Link code 



ICNCSWSV 
Save area for CSW 



ICNQUF 
QUIESCE FSB pointer 



ICNZH001 
VS/1 alias 



CNCB (ISTICNCB) (continued) 



















Dec Hex 





1 


2 


3 




ORG ICNRPH 










160 AO 




ICNRPHF 
Fixed RPH 








268 IOC 




ICNCRAB 
Basic CRA 








432 1B0 




ICNTCRR 
TPIOS process CRR 








Flags and mas 


cs 










Disp. Flag Contains 


Mask 


Value 


Means 











70(46) ICNERACT Action code 


ICNRSV03 


X'FO' 


Reserved 




ICNINOP 


X'08' 


No processing can 
be done 




ICNIPL 


X'04' 


Re-IPL request 




ICNRSV04 


X'02' 


Reserved 




ICNPOST 


x-or 


Post error message 


64(40) ICNFIAG 3705 flag byte 


ICNSLOW 


X'80' 


3705 in slowdown mode 




ICNUEST 


X'40' 


Unit exception status 




ICNERP 


X'20' 


ERP in control 




ICNMSG 


X'10' 


ERP message being 
processed 




ICNANS 


X'C8' 


Auto network shutdown 
in process 




ICNZF010 


X'08' 


VS1/2 alias 




ICNCLOSE 


X'04' 


Short OBR record for 
SDRCT 




ICNBFDPL 


X'02' 


Buffer depletion 




ICNSTART 


X'01' 


ICN start in progress 


65(41) ICNFLG2 Flag byte 


ICNZF013 


X'80' 


370X load complete 
switch 




(3NM00001 


X'40' 


Reserved 




ICNZF006 


X'40' 


and 3705 sick or quiesced 








ICNRSRT 


X'20' 


Restart in progress 





CNCB (ISTICNCB ) (continued) 

Flags and masks (continued) 
Disp. Flag Contains 



84(54) ICNSENSE Sense byte 



ICNZFOOE 


X'20' 


VS 1/2 alias 


ICNOUIP 


XMO' 


Quiesce pending 


ICNRF04 


X'08' 


Reserved 


ICNRSV05 


X'04' 


Reserved 


ICNRF06 


X'02' 


Reserved 


ICNRF07 


X'01' 


Reserved 


ICNCMDRJ 


X'80' 


Command reject 


ICNINTRQ 


X'40' 


Interaction required 


ICNBOCHK 


X'20' 


Bus out check 


ICNEQCHK 


X'10' 


Equipment check 


ICNSN01 


X'08' 


Data check 


ICNSN02 


X'04' 


Over-run 


ICNIPLRQ 


X'02' 


IPL request 


ICNABORT 


X'01' 


C.A. switch 



Constants in ISTICNCB 
Label Value 



ERCCTLCK 

ERCSNDNT 

ERCCHDCK 

ERCEPLRQ 

ERCEQCHK 

ERCINTRQ 

ERCBOCHK 

ERCCMDRJ 

ERCCCEQ3 

ERCABORT 

ERCCHDMG 

ERCCHNCK 

ERCPGMCK 

ERCPRTCK 



XERPFUP 

ERCSNOST 

ERCOVRRN 

ERCDTACK 

ERCUNKN 



RCONORML 
RCORETRY 
RCOABEND 
RCOERROR 



X'01' 
X'02' 
X'03' 
X'04' 
X'05' 
X'06' 
X'07' 
X'08' 
X'09' 
X'OA' 
X'OB' 
X'OC 
X'OD' 
X'OE' 



Meaning 

Control check 

Channel data check 
IPL request 
Equipment check 
Interaction required 
Buscut check 
Command reject 
Device not available 
C.A. switch has occured 
Channel damaged 
Channel check 
Program check 
Protection check 



*** Constant for flipping read and write control CONS *** 

X'60 1 For exclusive or agains OP codes in ICNRSCCW and IC 

X'OF 1 Should not occur 

X'10' Over-run 

X'lT Data check 

X'12' Unknown condition has caused ERP to be entered 

*** Constants for return codes set by ERPS *** 

X'OT Process as normal 

X'02' Error is retyable 

X'04' Error is retyable but failure is not located 

X'08' Error is permanent and not retryable 



CNCB (ISTICNCB ) (continued) 

Constants in ISTICNCB (continued) 

Label Value Meaning 

*** Constants for error action code set by ERPS (INCERACT) * 
ERAPOST X'GT Post error message 

ERAIPL X'04' Re-IPL requested 

ERAINOP X'08' No processing can be done 

ICNWINIT X'31' Write start 1 OP code 

ICNRINIT X'32' Read start 1 OP code 



COMRG (ISTCOMRG ) 



Dec Hex 




20 
24 



2C 
30 



COMDATE 
Job date 



COMPPBEG 
End of supervisor 



COMEOSSP 
End of storage protection 



COMSCRAT 
User scratch area 



COMUPSI 
UPS I byte 



COMNAME 
Job name 



COMPPEND 
Address of last byte of PP area 



COMHIPHS 
Address of last fetch or load 



COMHIPRG 
Address of longest PP phase 



COMLABLN 
Length of PP label area 



COMPIO 
Program interrupt key 



COMEOCA 
Address of end of core 



COMCONFG 

Machine 
configuration 



COMJCSW1 
Job control 
switch 1 



COMLTACT 

Configuration 

options 



COMLCTL 
Linkage control 
byte 



COMDALC 
Disk address of label cylinder 



COMPUBPT 
Address of PUB table 



COMSOBT 
Standard optio 
byte 1 



CONJCSW3 
Job control 
switch 3 



COMSOB2 

Standard option 

byte 2 



CONJCSW4 
Job control 
switch 4 



COMPOCL 
Address of FOCL 



COMFAVP 
Address of FAVP 



COMRG (ISTCOMRG) (continued) 



Dec Hex 
68 44 



100 64 

104 68 

108 6C 

112 70 






1 


2 


3 


COMJIBPT 
Address of JIB table 


COMTEBPT 
Null TEB address 


COMFICL 
Address of FICL 


COMNICL 
Address of NICL 


COMLUBPT 
Address of LUB table 


COMSYSLN 
System line count 




COMSYSDT 
System date 




COMLIOCS 
LIOCS communication bytes 


COMPIBPT 
Address of PIB table 


COMCHKID 
Last check point number 


COMLTHID 
Length of LUB ID queue 


COMDIBPT 
Address of background DIB 


COMERBL 
Address of transient CONREG 


COMPCPTR 
Address of PC option table 


COMITPTR 
Address of IT option table 


COMOCPTR 
Address of OC option table 


COMPWTIM 
Key of PGM with IT support 


COMLUBID 
Address of LUB ID queue 


COMLTR 
Logical transient key 


COMSYSPM 
SYSPARM field 


COMJAPT 
Address of job accounting table 


COMSYSCM 
Address of SYSCOM 


COMPIB2 
Address of PIB extension 


COMMICR 
Address of MICR DTF 


ONM00004 
Reserved 


COMBGCOM | COMOPTN 
Address of background COMRF.G Option 

I indicator byte 


0NMOOOO6 
Reserved 



COMRG (1STCOMRG ) (continued) 



Dec Hex 
136 88 



COMEXT 
Address of COMREG extension 



£NM00007 
Reserved 



@NM00008 
Reserved 



ORG COMSYSDT 



79 4F 

80 50 



COMMDD (CONT) 
MMDD or DDMM part 



COMYYDDD 
YYDDD part 



Flags and masks 

Disp. Flag Contains 

53(35) COMLTACT Configuration optic 



134(86) COMOPTN Option indicator 
byte 



Value Means 



@NM00002 X'FC 
COMASYNC X'02' 



(PNM00003 X'Ol' 
(SNM00005 « X'FE' 



COMANCHT X'Ol' 



Reserved 

Asynchronous processing 

in operation. 

Reserved 

Reserved 

Partition anchor 
table exists: 



CONFT (ISTCONFT) 



60 3C 

64 40 

68 44 



CONCONFG 
Name of configuration table 



CONAPINM 
API Module name 



CONAPSNM 
APS Module name 



CONDMNM 
Device Management Control Layer Module Name 



CONFBPNM 
Feedback processing routine module name 



CONACB 
Pointer to VTAM ACB 



CONCIBAD 
Pointer to command input buffer 



CONDISLA 
Display command parameter list address 



CONNCSLA 
NCS parameter list address 



CONHLTLA 
Halt command parameter list address 



COMMODLA 
Modify command parameter list address 



CONVARLA 
Vary command parameter list address 



CONENDLA 
The last command processed parameter list address 



11-51 



CONFT (ISTCONFT) (...Continued) 





Hex 

48 

4C 

50 

54 

58 

5C 

60 

64 

68 

6C 
70 

74 
80 
8C 










Dec 





1 


2 


3 


72 


CONSTCIB 
Start command CIB address 


76 


CONRDBUF 
Buffer address used by read routine 


80 


CONLDPRM 
Pointer to ISTLDPRM 


84 


CONDCBOA 
Address of VTAMUBDCB 


88 


CONDCBLA 
Address of VTAMUBDCB 


92 


CONDCBBA 
Address of VTAMUBDCB 


96 


CONRSV02 
Reserved 


100 


Size of 


CONBUFSZ 
Duffer used by read 
routine 


CONCID 
Operator terminal CID 


104 


CONRES2 
Reserved 


CON LAST 
Last command 
code 


, CON HALT 
Halt flags 


CONVARY 
Vary code 


108 


CONDISPL 
Display code 


CONMODFY 
Modify code 






112 




CONFLAGS 
Flags 




CON RS VI 7 
Reserved for 
alignment 


116 


CONSFSBF 
Small fixed list 


128 


CONSPSBF 
Small pageable list 


40 


CONLFSBF 
Large fixed list 



CONFT (ISTCONFT) (...Continued) 



CONLPSBF 
Large pageable list 



CONVFSBF 
Variable length fixed list 



CONVPSBF 
Variable length oageable 



CONIOSBF 
I/O Fixed list 



CONVVPSBF 
Working Set Pool list 



CONAPSBF 
ACE/ICE pool list 



CONNPSBF 
Non-working set list 



CONPPSBF 
Pageable data pool list 



CONCRPLS 
CRPL pool list 



CONSFDBF 
Small fixed list 



CONFT (ISTCONFT) (...Continued) 



CONSPDBF 
Small pageable list 



CONLFDBF 
Large fixed list 



CONLPDBF 
Large pageable list 



CONVFDBF 
Variable-length fixed list 



CONVPDBF 
Variable-length pageable 



CONUEDBF 
UECB list 



CONIODBF 
I/O fixed list 



CONWPDBF 
Working set pool list 



CONAPDBF 
ACE/ICE pool list 



CONNPDBF 
Non-working set pool list 



CONFT (ISTCONFT) (...Continued) 



416 1A0 
420 1A4 



CONFLG01 
Init/term flags 



CONPPDBE 
Pageable data pool list 



CONCRPLD 
CRPLpool list 



CONRSV01 
Reserved - for Alignment 



CONVTHDR 
VTAM RDT header 



CONVVTAM 
Application entry for VTAM 



CONTOLTP 
Application entry for TOLTEP 



CON TRACE 
Application entry for TRACE 



CONNTSOL 
Application entry for NETSOL 



CONRECON 
Application entry for RECOVERY 



CONECDET 
ECB to be posted upon subfask completion 



CONFT (ISTCONFT) (...Continued) 



Dec Hex 

1132 46C 

1136 470 

1140 474 



CONSTAFP 
Footprint for non-PSS state rtn. for VTAM task 



CONLIST 
Two character storage area for 
the 'List-ID' operand 



CONRSV50 
Reserved preserve alignment 



CONCSCB 
Pointer for CSCB 



CONFNSAT 
Attach parameter list for Network solicitor 



CONFTRAT 
Attach parameter list for trace 



CONFLDAT 
Attach parameter list for load/dump 



CONFXXAT 
Attach parameter list for SYS def . 



CONFTTAT 
Attach parameter list for TOLTEP 



CONRSV24 
RESERVED 



CONRVPT1 
Reserved 



CON UN ITS 
RN Host Buffersize, LBUF DOS/VS 
IQBUF in V/S 1,2 



CONSDECB 
ECB used to post ISTSDCLM to run SYS def IO code 



CONSDMLC 
Ptr to SYS def parameter list ISTMLCA 



CONFT (ISTCONFT) ( . . . Continued) 



CONF01SV 
Host attach save are ptr 



CONRSV04 
Reserved 



CONRSV05 
Reserved 



CONRSV06 
Reserved 



CONRSV07 
Reserved 



CONRSV08 
Reserved 



CONRSV09 
Reserved 



CONRSV10 
Reserved 



CONRSV11 
Reserved 



CONRSV12 
Reserved 



CONRSV13 
Reserved 



CONRSV14 
Reserved 



CONRSV15 
Reserved 



CONRSV16 
Reserved 



ORG CONFLAGS 



ORG CONFLAGS+1 



CONDSFLG 
Data set flags : 



CONOPTFL 
Optional 
services flags: 



CONFT (ISTCONFT) (...Continued) 



12 3 



ORG COMFLAGS+2 



CONSTAT 
Resource status 
flags : 



ORG CONFLAGS+3 



CONBUFF 
Buffer status flags 



Flags 


and Masks 










Disp. 


Flag 


Contains 


Mask 


Value 


Means 


113 


CONBUFF 


Buffer status flags 


CONSFEX 


X'80' 


Small fixed pool exists 


(71) 






CONSPEX 


X'40' 


Small paged pool 
exists 








CONLFEX 


X'20' 


Large fixed pool exists 








CONLPEX 


X'10' 


Large paged pool 

exists 

Variable fixed BFR 








CONVFEX 


X'08' 












pool (DOS) exists 








CONVPEX 


X'04 1 


Variable paged 
buffer pool exists 
(DOS) 








CONUECB 


X'02' 


UECB pool exists 
(VS1 &VS2) 








CONIOEX 


x'or 


I/O fixed pool exists 








CONWPEX 


X'80' 


Working set pool 
exists 








CONAPEX 


X'20' 


Non-working set 
pool exists 








CONPPEX 


X'10' 


Pageable data pool 
exists 








CONCRPL 


X'08' 


CRPL pool exists 


110 


CONDSFLG 


Data set flags: 


(SNM00006 


X'80' 


Reserved 


(6E) 






(SNM00007 


X'40' 


Reserved 








(SNM00008 


X'20' 


Reserved 








CONSYOBJ 


X'10' 


SYS1 VTAMOBJ is 
open 








CONSYLIB 


X'08' 


SYS1 VTAMLIB is 
open 








CONSYLST 


X'04' 


SYS1 VTAMLST is 
open 


416 


CONFLG01 


in it/Term flags 


CONFTSTM 


X'80' 


Bit to indicate set 


(1A0) 










timer 








CONFTTMR 


X'40' 


Bit to indicate timer 
is running 








CONFTEXS 


X'20' 


Exits scheduled flag 








CONFTNAC 


X'10* 


No active connections 
flag 








CONFTNSA 


X'08' 


Bit to indicate network 
solicitor active 



CONFT (1STCONFT) (...Continued) 



F lags and Masks (Continued) 
Disp. Flag Contains 



416 CONFLG01 Init/Te. 
(1A0) (Cont.) (Contin 



106 CONHALT Halt flags 

(6A) 

111 CONOPTFL Optional 

(6F) flags 



112 CONSTAT Resou 
(70) flags 



Mask 


Value 


Means 


flags CONFTTA 


X'04' 


To indicate 


»d) 




TOLTEP active 


CONFTPSA 


X'02 1 


Bit to indicate 
Port Solicitor 
active 


CONNSNEC 


X'01' 


Indicate network 
solicitor is 
necessary 


; CONHLTO 


X'80 1 


Quick flag 


CONHLTS 


X'40' 


Session flag 


services @NM00009 


X'80' 


Reserved 


©NMOOOIO 


X'40' 


Reserved 


(SNM00011 


X'20' 


Reserved 


@NM00012 


X'10' 


Reserved 


CONBUFTR 


X'08' 


Buffer trace 
requested 


CONBTUTR 


X'04' 


BTU trace 
requested 


CONMOCTR 


X'02' 


Module trace 
requested 


CONIOTR 


x'or 


I/O trace 
requested 


status (SNM00013 


X'80' 


Reserved 


@NM00014 


X'40* 


Reserved 


@NM00015 


X'20' 


Reserved 


CONSTOR 


X'10' 


VTAM has storage 


CONDSOPN 


X'08' 


Data sets open 


CONLODED 


X'04' 


VTAM routines 
loaded 


CONVRYIN 


X'02' 


Network varied in 


CONACTV 


x'or 


Operator active 



DEV (ISTDEVCH) 











DEVSHCH 
DevJSched. 


DEVTCODE 
Device type 
Codes 


DEVMCODE 
Device model 
Code 


DEVFLAGS 
Use depends 
on DEVSHCH 
values 


DEVPHYSA 
Physical 
Device 
Address 


DEVRSV03 
Reserved 



Org DEVSHCH 



DEVCHAR 
Compatibility 
Existing Code 



Org DEVTCODE 



DEVCHAR2 
Compatibility 
Existing Code 



Displacement List of Fields in ISTDEVCH 

Dec Hex Field Dec Hex Field 



Dec Hex Field 



0000 0000 DEVCHAR 

0000 0000 DEVSHCH 

0001 0001 DEVCHAR2 



0001 0001 DEVTCODE 0004 0004 DEVPHYSA 

0002 0002 DEVMCODE 0005 0005 DEVRSV03 

0003 0003 DEVFLAGS 



Alphabetical List of Fields in ISTDEVCH 

Field Dec Hex Field Dec Hex Field Dec Hex 

DEVCHAR 0000 0000 DEVMCODE 0002 0002 DEVSHCH 0000 0000 

DEVCHAR2 0001 0001 DEVPHYSA 0004 0004 DEVTCODE 0001 0001 

DEVFLAGS 0003 0003 DEVRSV03 0005 0005 



DEV (ISTDEVCH) ( Continued) 



F lags and Masks 



Flag 
DEVCHAR 



Compatibility existing DEVINPUT 


X'80' 


Device is .for input 


Code 


DEVOTPUT 


X'40' 


Device is for output 




DEVCONVR 


X'20' 


Device is conversation 
RN definition 




DEVSUBND 


X'10' 


Device has schedulable 
sub-nodes 




DEVSPS 


X'08 1 


Device is Start Print 
sensitive 




DEVNNSPT 


X'04' 


Node has Network 
Mngmnt SPRT 




DEVCCTL 


X'02' 


Node has Conn Cntrl 
Dependencies 




DEVRSV01 


X'OT 


Reserved 


Use depends on 


DEVFCCTL 


X'FO' 


Used if Device Req 


DEVSHCH values 






Conn CTRL 




DEVCBSC 


X'80' 


Reset orderly, Bi-Synch 
Terminals except 
3270 's 




DEVCSSL 


X'40' 


Reset at end of command. 
3270 's and Start/ Stop 
exc 




DEVCRVB 


X'20' 


Reset Immediate. 
Start/ Stop terms with 
Reverse BRE 




DEVCSWL 


X'10' 


l=Higher Node is Switch 
Connection, 
0=Leased Connection 




DEVCHAR3 


X'OF' 


Compatibility existing 
code 




DEVCATTN 


X'08 1 


Terminal can interrupt 
with attention 




DEVCCHEK 


X'04' 


Terminal has checking 




DEVCSTCL 


X'02' 


Terminal has Station 
Control 




DEVCSLPN 


x'or 


Terminal has Selector 
Pen 



DEV (ISTDEVCHJ ( Continued) 



Constants in ISTDEVCH 



Label 


Value 


Meaning 


DEV2740 


X'01' 


Device 


s a 2740 


DEV2741 


X'02' 


Device 


s a 2741 


DEVTWX 


X'04' 


Device 


saTWX 


DEVWTTY 


X'05' 


Device 


sa WT7Y 


DEV83B3 


X'07' 


Device 


s an 83B3 


DEV2715 


X"08' 


Device 


s a 2715 


DEV2770 


X'09' 


Device 


s a 2770 


DEV2780 


X'OA' 


Device 


s a 2780 


DEV3735 


X'OB' 


Device 


s a 3735 


DEV3780 


X'OC 


Device 


s a 3780 


DEV3125 


x'ir 


Device 


s a 3125 


DEV3135 


X'12' 


Device 


s a 3135 


DEVSYS3 


X'13' 


Device 


sSYS3 


DEV3704 


X*16' 


Device 


s a 3704 


DEV3705 


X'17' 


Device 


s a 3705 


DEV2980 


XM8' 


Device 


s a 2980 


DEV3277 


X'19' 


Device 


s a 3277 


DEV3284 


X'lA' 


Device 


s a 3284 


DEV3286 


X'lB' 


Device 


s a 3286 


DEV3275 


X'lC 


Device 


s a 3275 


DEV3741 


X'lD' 


Device 


s a 3741 


DEV3747 


X'lE' 


Device 


s a 3747 


DEVMTA 


X'28' 


Device 


s an MTA 


DEV2972 


X'33' 


Device 


s a 2972 


DEV3271 


X'34' 


Device 


s a 3271 


DEV3272 


X'36' 


Device 


s a 3272 


DEVCC 


X'35' 


Device 


s a CLST controller 


DEVLU 


X'6D' 


Device 


s a Logical Unit 


DEV545 


X'78' 


Device 


sa545 


DEV2203 


X'7B' 


Device 


s a 2203 


DEV2213 


X'7C 


Device 


s a 2213 


DEV2265 


X'7D' 


Device 


s a 2265 


DEV2502 


X'7E' 


Device 


s a 2502 


DEV50 


X'TF' 


Device 


sa50 


DEV5496 


X'81' 


Device 


s a 5496 


Model Codes 






DEVMOD1 


X'OO' 


Model 1 




DEVMOD2 


X'01' 


Model 2 





DNCB (ISTDNCB) 



Dec Hex 












■*- DNCNCB 

Common NCB 


DNCBHSET 
Current device 
BHset 


DNCMODE 
Current Device Proc. Options 


: DNCDOS 

DOS TPIOS extension 


:: 











DNCSESIQ 
Head of Envite Session Queue 



DNCSESCQ 
Head of Contact Session Queue 



DNCB (ISTDNCB) ( Continued) 



Dec Hex 
56 38 



DNCSHEDQ 
Command queue 



DNCRESET 
Reset trcp 



Or g DNCRESET 



DNCBUFA 
Trapped buffer queue 



DNCRFLG 
Trap flags 



Org DNCRESET+5 



DNCIFMCB 
Address of Invitors FMCB 



Or 


q DNCDOS+20 








DNCICIP 


DNCLICP 


DNCACIP 




Count of l/P 


Limit of l/P 


Count of all 




commands 


commands 


commands 




currently in 


in process 


currently in 




process 




process 



Org DNCDOS+23 



DNCLACP 
Limit of all 
commands 
currently in 
process 



DNCFLAG 
Flag byte 



Org DNCDOS+25 



DNCSAF 
Current session 



DNCB (I5TDNCB) (continued) 



Flags and Masks 
Disp. Flag 
70(46) DNCACIP 

72(48) DNCFLAG 



Contains 

CNT of all 
CMNDS cur. 
in process 
Flag byte 



64(40) DNCRFLG Trap flags 



Mask 


Value 


Means 


DNCLCLP 


X'80' 


Last command in LCP 
process 


DNCSTAT 


X'FO" 


DNCB session status 


DNCSESS 


X'80' 


Resource in session 


DNCINVIT 


X'40' 


Invite pending 


DNCCONT 


X'20' 


Contact pending 


DNCDISC 


X'10' 


Disconnect pending 


DNCDHO 


X'08' 


Don't honor open in 
progress 


DNCBSC 


X'04' 


BSC sense status to come 


DNCRMF 


X'02' 


Record mode flag 


DNCSLOWQ 


x-or . 


Requests queued due to 
slow down condition 


DNCSYNC 


X'80' 


Synchronization flag 


DNCCRF 


X'40' 


Contact reqrd for nxt com'd 


DNCTF1 


X'20' 


Toltep flag 1 


DNaF2 


X'10' 


Toltep flag 2 


DNCRSI 


X'08' 


Reset suppressed invite 


DNCDFE 


X'04' 


Disconnect feedback 
expecte indicator 


DNCPSOL 


X'02' 


= 1 indicates dial 
in/port solicitor, =0 
indicates 


DNCZF008 


X'01' 


Data purge flag 



DNCB (ISTLPNCB) 



Dec Hex 




60 3C 

64 40 
68 44 



80 50 



LDNCB 
Common NCB Header 



LDNCUUA 
UCB/Pub CUA - CUA from DRTE 



LDNTSAF 
Test FMCB Saf 



LDNCFLAG 
Flags 



LDNRESRV 

Reserved/Dword 

Padding 



LDNQFLD 
LDNCB queue element 



LDNFLAG1 
First flag byte 



LDNFLAG2 
Second f I ag 
byte 



LDNRTLIM 
ERP Retry Limit 



LDNRCODE 
ERP Return Code 



LDNERPSV 
Save area for return code 



LDNCSWSV 
CSW save for TOLTEP 



LDNCPQ 
Queue of pending channel programs 



LDNVCPAD 
Virtual address of channel program 



DNCB (ISTLDNCB) ( Continued) 



Dec Hex 

84 54 



LPNFCCW 
Failing CCW moved in by CE 



LDNREADA 
Address of Read RPH 



LDNPDIA 
Address of pushed down Invite RPH 



LDNHUCA 
Address of held up Contact RPH 



LDNRESCT 
Residual count for Read 
Modified 



LDNINIT 
Initial count for Read 
Modified 



LDNCCB 
CCB for Device 



LDNTECT 
Temp Error 
counter 



LDNZH002 
VS alias 



LDN3270A 
Reserved for 3270 Send/Recv 



LDN3270B 
Reserved for 3270 Send/Recv 



LDN3270C 
Reserved for 3270 Send/Recv of cells for zero 



Or g LDNQFLD 



LDNCSLB 
CS label for Intpt Cells 



DNCB (ISTLDNCB) (continued) 

















Dec 


Hex 





1 


2 


3 






ORG LDNCSLB 








52 


34 


LDNTYPE 
LDNCB type 
code for element 


LDNASYI 
Ays interrupt 
accumulator 








OR 


G LDNSCLB + 2 








54 


36 


LDNCELLN 
Last cell used 
by CE appdge 


LDNCELLM 
Last cell proc 
by enbld RTN 






OR 


GLDNQFLD + 4 








56 


38 


LDNCHFLD 
Used when LDNCB is qued elt 






OR 


G LDNERPSV 








64 


40 


LDNCSW 
CSW status bytes 








OR 


G LDNCSW 






64 


40 


LDNCSWD 
Device byte 


LDNCSWC 
Channel byte 








OR 


G LDNERPSV + 2 








66 


42 


LDNSENSV 
Sense byte 


LDNSNSV2 
Sense byte for 
final failure 






OR 


G LDNFCCW 








84 


54 


LDNVFCCW 
Virtual address of failing CCW 






OR 


3 LDNTECT 








124 


7C 


LDNZX001 
VS alias 






F lags and mask 
Disp. Flag 
53(35) LDNA5 

50(32) LDNCF 


s 

Contains 

Yl AYS interr 
accumulate 

LAG Flags 


Mask Value 

upt LDNIUSE X'80' 
> LDNISYN X'40' 
LDNCELL1 X'30' 
LDNCELL2 X'OO 
LDNCELL3 X'03' 
LDNIBI X'80' 
LDNRMF X'40' 


Means 

LDNCB Q element active 

LDNCB Q E SYNC flag 

Cell 1 

Cell 2 

Cell 3 

In bracket indicator 

Record mode indicator 



©NM00026 X'3F' 



DNCB (ISTLDNCB) (continued) 



Disp. Flag 


Contains 


Mask 


Value 


Means 


60(3C) LDNFLAG1 


First flag byte 


LDNSEL 


X'80' 


Indicates select 
inserted/required 






LDNBMPX 


X'40' 


Device on block 
MPX channel 






LDNATTN 


X'20' 


Inhibits I/O so that 
read can be issued 






LDNCE 


X'10' 


Indicates an early CE 






LDNERP 


X'08' 


Indicates entry from ERP 






LDNISI 


X'04' 


In session indicator 






LDNMODEL 


X'02' 


Model 3270 Indication, 
1 IF model 1, IF model 2 






LDNDEVTP 


X'OT 


Dev type, 1 - PTR, 
- display 


61(3D) LDNFLAG2 


Second flag byte 


LDNERLCK 


X'80' 


Device error lock 






LDNCLOSD 


X'40' 


Closedown flag 






LDNTMIND 


X'20' 


Tes mode indicator 






LDNSERPO 


X'10' 


Suppress ERPS/output 






LDNSERPI 


X'08" 


Suppress ERPS/input 






LDNSAI 


X'04' 


System available 
indicator 






LDNTPBIO 


X'02' 


IF 1, l/Oblkdfor 
toltep 






LDNRSV01 


X'01' 


Reserved 



Constants in ISTLDNCB 



Label 


Value 


RCLIMEXD 


x-or 


RCNORTRY 


X'C2' 


RC1NTREQ 


X'03' 


RCCOMREJ 


X'04' 


RCOPRCHK 


X'05' 


RCPRNTER 


X'06" 


RCPARCHK 


X'07' 


RCPNTRDY 


X'08' 


RCILLWRT 


X r 09' 


RCVTAMER 


X'OA' 


RCOTHER 


X'OB' 


ICATTN 


B'OT 


ICATTNUC 


B-ir 


ICDE 


B'10" 


ICEND 


X'FFOOOOOO' 


ICTST 


X"003FFFFF' 


RCNOTOPR 


X'OF' 



Meaning 

Retry limit exceeded 

No CCW from which rtry poss 

Device not ready 

Invalid CMD rejected by CU 

Inval order in data stream 

Pointer hammer error 

Parity check from PTR buff 

PTR went disable/not ready 

lllgl CHN from write to PTR 

VTAM error 

Any other hardware error 

Cell indicates attn int REC 

Cell ind attn UC int reed 

Cell ind asy de intrp recvd 

Mask to clr interupt accum. and indices 

Mask to clr type byte and flags prior to TST 

Not operational 



DTF (ISTDTFLT) 



Dec Hex 




DTFFTSD 
Substructure for Seq DTF 



DTFFTDA 
Substructure included with DTFFTSD for DA DTF 



Org DTFFTSD 



Org DTFFTDA 



DTFDEVAD 
Pointer to Device Address 



DTFBLKS! 
Pointer to Block Size 



DTFIOARA 
Pointer to I/O Buffer 



DTFNAME 
Pointer to DTF Name 



DTFSEEKA 
Pointer to Seek Address 



DTFERBYT 
Pointer to Error Byte 



DTFDSKX 
Pointer to Disk Extent Field 



DTF (ISTDTFIJ) ( Continued) 



Displacement List of Fields in ISTDTFLT 

Dec Hex Field Dec Hex Field 



Dec Hex Field 



0000 0000 DTFDEVAD 
0000 0000 DTFFTSD 
0004 0004 DTFBLKSI 



0008 0008 DTFIOARA 
0012 OO0C DTFNAME 
0016 0010 DTFSEEKA 



0016 0010 DTFFTDA 
0020 0014 DTFERBYT 
0024 0018 DTFDSKX 



Alphabetical List of Fields in ISTDTFLT 

Field Dec Hex Field 

DTFBLKSI 0004 0004 DTFERBYT 

DTFDEVAD 0000 0000 DTFFTDA 
DTFDSKX 0024 0018 DTFFTSD 



0020 0014 DTFIOARA 0008 0008 
0016 0010 DTFNAME 0012 000C 

0000 0000 DTFSEEKA 0016 0010 



DVT (ISTSDVT) 



Dec Hex 




SDVNAME 
Dvt of Process Mod . Name 



SDVOPTNS 
User Process Options 



SDVID 
Dvt Name Entry ID -'RDVT'- 



SDVQUALC 
Processor Qualification Criteria 



SDVPMEPA 
Entry Point Address if Dvt Entry is for processing M 



Org SDVNAME 



SDVRSV09 
Reserved 



SDVDEVC 
Processor Entry Name Qualifier 



Or g SDVOPTNS 



SDVTOTAL 
Total No. of 28 Byte 
Entries in Skel Dvt. 
Found 



SDVCNT 
No. of Process Modules to be 
included in a Real Dvt. 



O rg SDVID 



SDVFLAGS 
Flags 



Org SDVID+1 



SDVPARM 

Request 

Parameters 



DVT (1STSDVT) ( Continued) 



Org SDVID+2 



SDVRSV08 
Reserved 



16 10 

20 14 



Or g SDVQUALC 





SDVTTYPE 


Devi 


ce Type - From 'DVC =I Parameters 


SDVFEAT 








Reserved 




SDVCUATT 
Attachment 
Type - from 
'Att=' and 
'CU=' 





Org SDVQUALC+7 



Or g SDVOPTNS 
SDVCPATT 



Or g SDVCPATT 



SDVCONDD 
Pattern from 
'Cond=' 
Parameter 



SDVLINET 
Line Type from 
'Line = 
'Parameter 



Displacement List of Fields in ISTSDVT 

Dec Hex Field Dec Hex Field 



Dec Hex Field 



0000 0000 SDVRSV09 
0000 0000 SDVNAME 



0008 0008 SDVOPTNS 
0010 000A SDVCNT 
0012 000C SDVFLAGS 



0004 0004 SDVDEVC 

0008 0008 SDVCONDD 0012 000C SDVID 

0013 OOOD SDVPARM 

0014 000E SDVRSV08 



0008 0008 SDVCPATT 
0008 0008 SDVTOTAL 



0016 0010 SDVTTYPE 

0016 0010 SDVQUALC 

0020 0014 SDVFEAT 

0022 0016 SDVCUATT 

0023 0017 SDVLINET 

0024 0018 SDVPMEPA 



DVT (ISTSPVT) ( Continued) 



Alphabetical List of Fields in ISTSDVT 
Field Dec Hex Field 



Dec Hex Field 



SDVCNT 



0010 000A SDVFLAGS 0012 



SDVCONDD 0008 0008 SDVID 0012 

SDVCPATT 0008 0008 SDVLINET 0023 

SDVCUATT 0022 0016 SDVNAME 0000 

SDVDEVC 0004 0004 SDVOPTNS 0008 

SDVFEAT 0020 0014 SDVPARM 0013 



oooc 


SDVPMEPA 


0024 


0018 


oooc 


SDVQUALC 


0016 


0010 


0017 


SDVRSV08 • 


0014 


000E 


0000 


SDVRSV09 


0000 


0000 


0008 


SDVTOTAL 


0008 


0008 



000D SDVTTYPE 0016 0010 



Flags and Masks 








Flag Contains 


Mask 


Value 


Means 


SDVCUATT Attachment Type - 


SDVCULCL 


X'80' 


Local 


from 'Aft=' and 


SDVCURMT 


X'40 1 


Remote 


•CU=' 


SDVCUSA 


X'20' 


Stand Alone 




SDVRSV14 


X'10' 


Reserved for Component 
| 




SDVCUCLU 


X'08' 


Cluster Control Unit 1 




SDVCUCLC 


X'04' 


Cluster Component 




SDVRSV10 


X'02' 


Reserved 




SDVRSV11 


X'Ol' 


Reserved 


SDVFLAGS Flags 


SDVINCLD 


X'80' 


Include this process 
Mod. 




SDVBLDL 


X'40' 


Good BLDL for process 
Mod. 




SDVRSV01 


X'20' 


Reserved 




SDVRSV02 


X'10' 


Reserved 




SDVRSV03 


X'08* 


Reserved 




SDVRSV04 


X'04' 


Reserved 




SDVRSV05 


X'02' 


Reserved 




SDVRSV06 


X'Ol' 


Reserved 


SDVLINET Line Type from 


SDVLNNSW 


X'80' 


Non-switched line 


'Line='Parameter 


SDVLNSW 


X'40' 


Switched line 




SDVLNPP 


X'20' 


Point-Point line 




SDVLNMP 


X'10' 


Multi-Point line 




SDVLNSS 


X'08' 


Start-Stop line 




SDVLNBSC 


X'04' 


3SC line 




SDVLNDLC 


X'02' 


SDLC line type 




SDVRSV13 


x'or 


Reserved 


SDVPARM Request Parameters 


SDVUNCON 


X'80' 


Unconditional 




SDVCOND 


X'40' 


Conditional 




SDVEXCPT 


X'20' 


Except flag 




SDVQUAL 


X'10' 


Qualified 




SDVIN 


X'08' 


Inmost 




SDVOUT 


X'04' 


Outmost 




SDVRTRN 


X'02' 


Include Return Address 




SDVNORT 


x'or 


No Return Address 



FMCB (ISTFMCB) 



Dec Hex 




FMCTYPE 
Control Type 
Block Code 



FMCLNGTH 
Length in 
Bytes 



FMCSAF 
ID of Source 



FMCNXTCB 
Address of next FMCB in ACDEB 



FMCTSKID 
Task Identifier OS - TCB Address, DOS - P 



FMCDVTA 
Address of DVT Entry Point Table 



FMCDNCBA 
Address of DNCB for this Node 



FMCFMCBA 
Address of next FMCB for this Node 



FMCLGOFF 
Address of Buf, Msg + Len. 



FMCUSFLD 
Use Information Field 



FMCSTAT 
Source Status 
Information 



FMCSTAT 1 

Status 

Information 



FMCRSV01 
Reserved 
Preserve 
Alignment 



FMCCMDFL 
Command F lags 



FMCDEBA 
Address of ADDEB 



FMCRPLH 
Address of Held RPL 



FMCVWT 
RPH Address for Vary Wait 



FMCB (ISTFMCB) ( Continued) 



FMCPROCD 
Process Option From NIB 



FMCMODE 
Mode Name from N IE 



FMCDEVCH 
Area for Device Characteristics 



FMCPAB1 
Control Layer Outbound PAB 



FMCPAB2 
Control Layer Inbound PAB 



FMCB (ISTFMCB) ( Continued) 



Dec Hex 
104 68 



FMCPAB3 
Synch with Outbound PAB 



FMCPAB4 
TPIOS Inbound PAB 



FMCPAB5 
TPIOS all but Synch with Outbound PAB 



F/vACCUPA 
Address of Control Layer Inbound PAB 



F MCE X LSI- 
Address of CEXLST 



FMCSIPA 
Address of Session Control Inbound PAB 



FMCNXOSQ 
Next Outbound Sequence Nums. 



FMCB (ISTFMCB) ( Continued) 





Hex 
A8 

AC 
BO 

C4 

C8 

CC 

DO 

D4 
D8 










Dec 










168 


FMCISSN 
Inbound Sync. Sequence 
Number 


FMCRVD01 
For Control 
Layer xxxx 


FMCSSTAT 

Session-CPM 

Status 


172 


FMCPACE 
Pacin Counts 


176 




FMCCLEXT 
Basic Control Layer Extension 




196 




FMCBHSET 
BHSET ID 
Index for 
Connected 
Aplication 


FMCSTAT2 

Purge 

Flags 


FMCLUSTR 
Count of Start 
Ctls Rec 


200 


FMCIPSEQ 
Invite 
Perpetual 
Count 


FMCMODEB 
Mode Byte 


FMCCLS 
CL Sequence 


EQ 

M umbers 


204 


FMCCLSEQ 
(Cont.) 


FMCCTLB 
Ctl Type 
Outstanding 


FMCRRESP 
Respond Type 
Expected 


208 


FMCPSTRS 
Cnt Outstanding Post = 
Resp 


FMCRSP 
RESPLIM Val 


LM 
ue 


212 


FMCLOCK 
PMCB lock 


216 


FMCRDTPT 
PTR to RDTE after FMCB disconnect 



FMCB (ISTFMCB) ( Continued) 



Dec Hex 
220 DC 



FMCFASYA 
Dfasy any Q Chain 



FMCFRESA 
Resp any Q Chain Ptr 



FMCFBAS 
Dfasy Data Q Ptr 



FMCFBRE 
Resp Data Q Ptr 



FMCDOS 
DOS Extension 



Org FMCCMPS1 



FMCBUFLM 
Limit of queued buffers 



FMCBUFNB 
Number of queued buffers 



FMCSIP 
SCAFFOLD for DCR*' 



Org FMCNXOSQ 



164 


A4 


FMCNXCFM 
Next Outbound FM 
Seq. Number 




Ore 


FMCNXCEM 


164 


A4 


FMCOSSN 



FMCB (1STFMCB) ( Continued) 
Dec Hex 



Org FMCNXOSGH-2 



Org FMCNXOSC 



Or g FMCPACE 



FMCPACEN 
N Value of 
Pacing 



FMCNXOSC 
Next Outstanding SC Seq. number 



Or g FMCPACEN 



FMCNPCNT 



Org FMCPACE+1 



Org FMCPACEM 



Org FMCPACE+2 



Org FMCPACPC 



Org FMCPACE+3 



Or g FMCCLEXT 



FMCPACEM 
M Value of 
Pacing 



FMCPACPC 
Current Pacing 
Count 



FMCCVAL 
Chain Values 



Org 



FMCRPLRS 
Reserved 



FMCRPLA 
Addr of Application RPL 



FMCRPLPT 
Pointer to RPL 



FMCB (ISTFMCB) ( Continued) 













Dec 


Hex 












Orq 
B4 

Org 


FMCCLEXT + 4 




180 


FMCFBA 
Addr of FSB Data Queue 






FMCFBA 




180 


B4 


FMCFBRSV 
Reserved 


FMCFBPTR 
Pointer to FSB 




Org FMCCLEXT + 8 




184 


B8 
BC 
CO 


FMCRAFM 
Addr of FMCB on ACDEB Read any Queue 


188 


FMCDCLOK 
Cntr Layer FMCB Lock 


192 


FMCCMPS2 




Org 


FMCCMPS2 






192 


CO 


FMCFLGA 
Flag Field 1 
(Control 
Layer) 








Org 


FMCCMPS2+1 








193 


CI 


FMCFLGCL 
Flag Field 2 
(Record Control 
Layer) 








Org FMCCMPS2+2 








194 


C2 


FMCPSCMD 
Port Outstanding 
Command Field 






Org FMCCMPS2+3 






195 


C3 


FMCPSTAT 
Port Solicitor 
Status Flags 



Org FMCOS+24 



FMCPRMRC 
Purge Minor 
Return Code 



FMCB (ISTFMCB) ( Continued) 



Org FMCCLSEQ 





FMCTSQNO 
Expected Response Seq Nr. 


FMCBSQNO 
Seq. Nr. Last Received 





Or g FMCSNaL 



FMCSCFLG 
Flag Byte 



Org FMCSNCTL+1 



Or g FMCDOS 



FMC5CCTL 
SC Last CTL 
Received 


FMCSCSQN 
SC Last Seq Nr Received 



FMCREQT 
Outbound Request Tag 



Or g FMCREQT 



FMCRTFGS 
Request Tag 
F lag Byte 



Org FMCREQT+1 



FMCSEQ1 
Next Outbound 
Sequence 



Org FMCDOS+2 



244 F4 



Or g FMCDOS+4 



Or g FMCPOS43 



FMCSEQ2 
Next Expected 
Inbound Seq 


FMCFLAGS 
FMCB Flags 



FMCSHEDQ 
Head of pending RPH Queue 



FMCLCPBQ 
Head of User LCPB Queue 



FMCCCNT 
Currently LCCW Count 



FMCB (ISTFMCB) ( Continued) 



Org FMCCCNT 



FMCTDAF 
DAF of Test Node 



Org FMCDOS+14 



FMaLMOD 


1 FMCBYTE 


LEXEC 


Flags 


Command 




Modifier 


1 



Org FMCDOS-H6 
100 



FMCPDFSCQ 
Seq Number of Last 1st 
in Chain RU 



FMCEXFIC 
First in chain sequence ^assoc. 
with exception resp 



FMCCLRPH 
ATR to CLS DST 



FMCLRC 
Lost Record Counts (Trace) 



Org 
264 108 



FMCOLRC 
Outbound Lost Record Count 



FMCILRC 
Inbound Lost Record Count 





Ora 
IOC 

110 


FMCDOS+ 23 


268 


FMCLXOQ 
LPCB for Reset Orderly Awaiting Delayed Completion 


272 


FMCSEGD 
Segmented input data QUE 



FMCB (ISTFMCB) (continued) 



Disp. Flag 


Contains 


Mask 


Value 


Means 


255(FF)FMCBYTE 


Flags 


FMCCRF 


X'80' 


Contact required 






FMCSESAQ 


X'40' 


Portsol session acquired 






FMCEOTRQ 


X'20' 


EOT expected after RVI 
from reset orderly 






FMCSSREQ 


X'10' 


Session status change IND 






FMCBRV4 


X'08' 


Reserved 






FMCBRV5 


X'04' 


Reserved 






FMCBRV6 


X'02 1 


Reserved 






FMCBRV7 


X'OT 


Reserved 


35(23) FMCCMDFL 


Command flags 


FMCCMDR 


X'80' 


1 = initiate self revd 






FMCVSNA 


X'40' 


FMCB for vary session 






FMCSNA 


X'20' 


User session with new dev's 






@NM00004 


X'lF' 


Reserved 


175(AF)FMCCVAL 


Chain values 


FMCOBCE 


X'FO' 


Current outbound 






FMCFIRST 


X'80' 


First piece 






FMCMIDLE 


X'40' 


Middle piece 






FMCIAST 


X'20' 


Last piece 






FMCONLY 


X'10' 


Only piece 






FMCIBCE 


X'OC 


Current inbound 






FMCPRCLS 


X'03' 


Presentation class, 
01 = record 


243(T3)FMCFLAGS 


FMCB flags 


FMCSIRP 


X'80' 


Session initiation req pend 






FMCUSIND 


X'40' 


Potential session indicator 






FMCUSIN1 


X'20' 


Copy of pot. sess. indie. 






FMCSIRE 


X'10' 


Session initiation request 
ended, no queue 






FMCSTRE 


X08' 


Session termination request 
ended, no queue posted 






FMCRESET 


X04' 


Reset request in progress, 
do not post 






FMCSIRQ 


X'02' 


Session initiation request 
queued for connection 






FMCSTPRT 


X'01' 


Start print bit 


192(C0)FMCFLGA 


Flag field 1 


FMCFLGAO 


X'80' 


Data expected 




(Control layer) 


FMCFLGA1 


X'40' 


In dialogue 






FMCFLGA2 


X'20' 


FMCB on ACDEB for read 
any 






FMCFLGA3 


X'10' 


Incoming data flush 






FMCFLGA4 


X'08' 


Purge in progress 






FMCFLGA5 


X'04' 


Buffer threshold exceeded 






FMCFLGA6 


X'02' 


Read done to 3735(on) 






FMCFLGA7 


x'or 


FMCB is locked 


193(C1)FMCFLGCL 


Flag field 2 
(record control 


FMO-'LGBO 


X'80' 


FMCB on ACDEB dfasy any 
Q 




layer) 


FMCFLGB1 


X'40' 


FMCB on ACDEB req any Q 






FMCFLGB2 


X'20' 


Satisfy dfasy spec. 






FMCFLGB3 


X'10' 


Satisfy resp spec. 






FMCFLGB4 


X'08' 


Reserved 






FMCFLGB5 


X'04' 


Post = sched outstanding 






FMCFLGB6 


X'02' 


Hold response outstanding 






FMCFLGB7 


X'OT 


Reserved 



FMCB (ISTFMCB) (continued) 



201(C9)FMCMODEB 



194(C2)FMCPSCMD 



195(C3)FMCPSTAT 



207(CF)FMCRRESP 



240(F0)FMCRTFGS 



236(EC)FMCSCFLG 



244(F4)FMCSHEDQ 
171(AB)FMCSSTAT 



Mode byte 


FMCHOLD 


X'80' 


Hold mode 




FMCCLEAR 


X'40' 


Clear in progress 




FMCAPQ 


X'20' 


Application quiesced 




FMCLUQ 


X'10' 


LU quiesced 




FMCRSTSR 


X'08' 


Resetsr in progress 




FMCRESOT 


X'04' 


Response outstanding 




FMCIBPRG 


X'02' 


l/B purge chain 




FMCOBPRG 


X'OT 


O/B purge chain 


Port outstanding 


FMCINVT 


X'80' 


Invite 


command field 


FMCCNTQ 


X'40' 


Contact 




FMCRESTI 


X'20' 


Reset immediate command 
outstanding 




FMCPURGE 


XMO' 


Purge (reset) 




FMCDSEOC 


X'08' 


Disconnect end of call 




FMCRDBLK 


X'04' 


Read block (start input) 




FMCRSV88 


X'03' 


Not defined 


Port solicitor status 


FMCELKST 


X'80' 


Error lock set 


flag 


FMCIDVED 


X'40' 


TPIOS could not find A 




FMCDDOCD 


X'20' 


Dial disconnect occurred 




FMCPCLSD 


X'10' 


Port being closed by 
port solicitor 




FMCRSV89 


X'OF' 


Reserved 


Respond type expected FMCFPE 


X'80' 


1 = path end response 




FMCFEX 


X'40' 


1 = exception response 




FMGFME 


X'20' 


= functbn MNMT end resp 




FMCFRRN 


X'10' 


1 = reached recovery mode 




SNM00005 


X'OF' 


Reserved 


Request tag flag byte 


: FMCRSV12 


X'EC 


Reserved 




FMCLBIND 


X'10' 


Last block indicator 




FMCNONCB 


X'08' 


No NCB indicator 




FMCINPET 


X'04' 


Invite perpetual ind. 




FMCASBTU 


X'02' 


Associated BTU to come 




FMCRSV11 


x-or 


Reserved 


Flag byte 


FMCIBSAC 


X'CO' 


Save IBSQAC 




FMCOBSAC 


X'30' 


Save OBSQAC 




FMCLURO 


X'08' 


LU owes response 




F MCA PRO 


X'04' 


Appl owes response 




FMCSCCLO 


X'02' 


Clear outstanding 




gNM00006 


X'OT 


Reserved 


Head of pending 


FMCSHEDG 


X'80' 


Gating bit 


RPH queu 








Session-CPM 


FMCSNBI 


X'80' 


Session not bound 


status 


FMCCIPI 


X'40' 


TPIOS clear in progress 




FMCUIPI 


X'20' 


Unbind in progress 




FMCSDTR 


X'10' 


SDT required 




FMCBIP 


X'08' 


Bind in progress 




FMCNSALU 


X'04' 


No session exists between 
the application and the 




FMCPURCH 


X'02' 


TPIOS purging chain start 




FMCCONF 


X'OT 


Sick flag 



FMCB (ISTFMCB) (continued) 



Disp. Flag 


Contains 


Mask 


Value 


Means 


32(20) FMCSTAT 


Source status info. 


FMCPRMTR 


X'80' 


FMCB is a preemptor 






FMCPRMTE 


X'40' 


FMCB is a preemptee 






FMCDAPT 


X'20' 


Device accepted 






FMCDEVOF 


X'10' 


Device varied or set by 
vary dsact. 






FMCDEDSC 


X'08' 


Device disconnected 






FMCZF007 


X*04' 


Buffer trace active flag 






FMCLTEAS 


X'02' 


Lost term exit scheduled 
for this FMCB 






FMCVSP1 


x-or 


Soft purge in progress 


33(21) FMCSTAT1 


Status information 


FMCVSP2 


X'80' 


A user request was soft 
purged 


198(C6)FMCSTAT2 


Purge flags 


FMCVP1P 


X'80' 


•Vary purge in progress 






FMCZF00A 


X'40' 


Purge successfully 
completed 






FMCIAIO 


X"20' 


Inhibit all I/O 






FMCALIPR 


X'10' 


Allocation in progress 






FMCCPIP 


X'08' 


CLSDST purge in progress 






FMCSEQI 


X'04' 


SEQ/ID, 1 = sequence 
number 






FMCRSV87 


X'03' 


Reserved 



FMCB (1STFMCB) (continued) 
FMCFLGB 

Dec Hex 







1 


2 


3 


FMCFLGB 
Flag field 2 
(control layer) 









Flags and masks 


Value 




Disp. Flag Contains Mcsk 


Means 


0(0) FMCFLGB Flag field 2 (control FMCFLGA8 


X'80' 


Reset conditional is 


layer) 

FMCFLRSV 


X'7F' 


active 
Unused 


Constants in FMCFLAG 






Label Value Meaning 






FMTYPE X'03' Type code for FMCB 







FMCOBCEI B'OOOl' 
FMCIBCEI B'll' 



FSB 


(ISTFSB) 












Dec 


Hex 


20 





1 


2 


3 





FSBFSB 
FSB without FDB 


32 


FSBFDB 
First FDB 




OR 


G FSBFSB 












FSBTYPE 
Control 
block type 


FSBLNGTH 1 FSBMNRCD 
Length in Minor return 
bytes 1 code of physica 
condition 






OR 
3 


G FSBFSB + 3 






3 




FSBSFLGS 
Tpios session 
flags 


4 


4 


FSBFSBA 
Address of next FSB 




OR 


G FSBFSBA 






4 


4 


@NM10001 
First byte of 
FSBFSBA 






OR 


G FSBFSB + 8 






y 


8 


FSBBTH 
BTH fields 




OR 


G FSBBTH 




8 


8 


FSBCID 
Communication ID 




OR 


G FSBCID 


8 


8 


FSBSAF 
Sixteen BIT source ID 


FSBDAF 
Sixteen BIT destination ID 




OR 


G FSBBTH + 4 






12 


C 


FSBRQTAG 
Request tag 






OR 


G FSBRQTAG 




12 


C 


FSBSEQID 
Sequence number of ID, SDCC 






OR 


G FSBSEQID 








12 


C 


FSBFLAGS 
F lag byte 





FSB (1STFSB) (continued) 



12 3 



ORG FSBSEQID + 1 



FSBSEQ 

Sequence 

number 



FSBCMD 
LCCW command 
for local dev 



ORG FSBBTH + 6 



ORG FSBCSWST 



ORGFSBTHFLD 



FSBCSWST 
CSW status 



FSBTHFLD 
Transmission header 



FSBTH1 
TH byte 1 



ORG FSBTHFLD + 1 



FSBSYSRS 
System response 



FSBTH2 
TH byte 2 



ORGFSBFSB+ 16 



FSBNETRS 
Network response 



ORG FSBNETRS 



FSBSRCAT 
System response 
category 



ORG FSBSRCAT 



FSBMJRCD 
Major return 
code 



FSBEXTRS 
Extended response 



ORG FSBNETRS + 1 



ORG FSBFSB + 18 



FSBERC I 

Extented response 

conditions I 



FSBDMGRS 
Device management response 



FSB (ISTFSB) (continued) 

















Dec 


Hex 





1 


2 


3 




ORGFSBDMGRS 










18 


12 

ORGFSBDMGRS+ 1 
13 




FSBSS1 
Status sense 
byte 1 














19 






FSBSS2 

Status sense 

byte 2 




ORG FSBFSB + 20 






20 


14 


FSBLCPB 
Address of LCPB 




OR 


G FSBLCPB 






20 


14 


FSBMSGID 
Operator message ID 




OR 


G FSBMSGID 






20 


14 


FSBICNCB 
ICNCB PTR - checkpoint rest 




OR 


G FSBFSB + 24 






24 


18 


FSBLCCWA 
LCCW address 




OR 


G FSBLCCWA 






24 


18 


FSBRLSTS 
Buffer release 
status 






OR 


G FSBFSB + 28 




28 


1C 


FSBTHCNT 
TH data count 


FSBRSV01 
Reserved 




OR 


G FSBNETRS 






16 


10 


FSBCOMBN 




OR 


G FSBCOMBN 






16 


10 


FSBALIGN 

Alignment 

byte 


FSBRHFLD 
Request/response header 




OR 


fiFSRRHFLD 






17 


11 

ORG FSBRH3 
13 


FSBRH1 
RH byte 1 


FSBRH2 
RH byte 2 


FSBRH3 
RH byte 3 










19 




FSBLDFLG 
Local device 

flags for 

record mode 



ORG FSBRQTAG 



(PNM00004 
Copy of ZLBRQFLG 



FSB (ISTFSB) (continued) 



Flags and masks 










Disp. Flag 


Contains 


Mask 


Value 


Means 


12(0C)@NM00004 


Copy of ZLBRQFLG 


FSBRTOO 


X'80' 


Logical error flag 






FSBRT01 


X'40' 


Control block error 






FSBRT02 


X'20' 


End of scheduling block 






FSBRT03 


X'10' 


Write/read request 






FSBRT04 


X'08' 


Feedback requested 






FSBRT05 


X'04' 


Decrement sched count 
on dequece 






FSBRT06 


X'02' 


Write request 






FSBRT07 


X'OT 


Scheduling flag 






FSBRT08 


X'80' 


Device end notification 






FSBRT09 


X'40' 


Critical text flag 






FSBRTOA 


X'20' 


Contact 






FSBRTOB 


X'10' 


Disconnect major return 
code type values 


4(4) @NM10001 


First byte of 


FSBFATE 


X'80' 


Gating flag 


FSBERC 


FSBFSBA exfented 


FSBELI 


X'80' 


End of LCP indication 




response conditions 


FSBECI 


X'40' 


End of command indicator 






FSBEBI 


X'20' 


End of block indicatior 






FSBEMI 


X'10* 


End of message indicator 






FSBETI 


X'08' 


End of transmission ind. 






FSBFBMI 


X'04' 


First block in message 






FSBLMRI 


X'04' 


Logoff message received 






FSBLGI 


X'02' 


Leading graphics 
indicator 






FSBSOHI 


X'01' 


SOH indicator 


15(0F) FSBEXTRS 


Extended response 


FSBXFSTS 


X'EO' 


First status 






FSBXNORM 


X'80' 


Off for norm 1st status 






FSBXCODE 


X'lF' 


Extended response code 






FSBXFINS 


X'lE' 


Final status 






FSBXLCI 


X'OT 


Leading chars indicated 


12(0C) FSBFLAGS 


F lag byte 


FSBRFIND 


X'80' 


Request feedback 
indicator 






FSBACIND 


X'40' 


Additional command 
indicator 






FSBFFIND 


X'20' 


Function flag generated 






FSBLBIND 


X'10* 


Last block indicator 






FSBNONCB 


X'08' 


No NCB for this request 






FSBINPET 


X'04' 


Invite perpetual response 






FSBASBTU 


X'02' 


Associated response to 






FSBDTRCE 


X'01' 


Device trace request 


19(13) FSBLDFLG 


Local device flags 


FSBLDRWF 


X'80' 


Record mode flag 




for record mode 


FSBLDSCF 


X'40' 


Session control flag 






FSBLDFME 


X'20' 


FME requested flag 






FSBLDBBF 


X'10' 


Begin bracket flag 






FSBLDEBF 


X'08' 


End bracket flag 






FSBLDSOF 


X'04' 


Send output command flag 






FSBLDSIF 


X'02' 


Send input command flag 






FSBLDCUF 


X'OT 


Clear/unbind flag 



FSB (ISTFSB) (continued) 



Disp. Flag 



2(2) FSBMNRCD 


Minor return code 


FSBMNELI 


X'80' 


Error lock indicator 




of physical condition 


FSBMNRVI 


X'40' 


RVI received 




flags 


FSBMNATH 


X'20' 


ATTN received 






FSBMNDNU 


X'10' 


Device not usable 






FSBMNEOP 


X'08' 


Output error 






FSBMNDIF 


X'04' 


Dialog initiation feature 






FSBMNDA 


X'02' 


Operation aborted 
due to CON 






FSBMNSDA 


X'01' 


Sense data available 


24(18) FSBRLSTS 


Buffer release 


FSBCFTX 


X'80* 


Buffer contains comfid text 




status 


FSBRLRSV 


X'7F' 


Reserved 


18(12) FSBSS1 


Status sense 


(SNM00001 


X'F8' 


Reserved 




byte 1 


FSBSSUS 


X'04 1 


Unit specify 






FSBSSDE 


X'02' 


Device end 






@NM00002 


X'01' 


Reserved 


19(13) FSBSS2 


Status sense 


@NM00003 


X'OO' 


Reserved 




byte 2 


FSBSSCR 


X'20* 


Command reject 






FSBSSIR 


X'10' 


Interv. required 






FSBSSEC 


X'08' 


Equipment check 






FSBSSDC 


X'04' 


Data check 






FSBSSCC 


X'02' 


Control check 






FSBSSOC 


X'01' 


Operation check 


14(0E) FSBSYSRS 


System response 


FSBSERR 


X'80' 


Error flag 






FSBSPHSE 


X'60' 


Response phase 






FSBSCODE 


X'lF' 


Response code 



ICE (IST1CE) 



Dec Hex 




ICEFLAGS 
Flag Bytes 



laSUBJ 
Address of ACDEB or RDT 



ICEOBJ 
Address of RDT or ACDEB 



ICESUBJQ 
Link Field for Sub Chain 



ICEOBJQ 
Link Field for OBJ Chain 



ICESIDE 
Field Link for Other Ices 



ICE DATA 
Address of Request Data 



ICERPHA 
Address of RPH 



UNNAMED 
PAD to Full Word 



ICEUECBX 
Anchor for Chain of UECBS or ICX 



ICERSC2B 
Resource 2 Name from Initiate RU 



ICE (ISTICE) ( Continued) 
Displacement List of Fields in ISTICE 



Dec Hex Field 



Dec Hex Field 



Dec Hex Field 



0000 0000 ICESUBJ 

0004 0004 ICE OB J 

0008 0008 ICESUBJO 

0012 000C ICEOBJQ 



0016 0010 ICESIDE 

0020 0014 ICEDATA 

0024 0018 ICERPHA 

0028 00 1C ICEFLAGS 



0029 001D @NM00019 
0032 0020 ICEUECBX 
0036 0024 ICERSC2B 



Al phabetical List of Fields in ISTICE 



Field 



Dec Hex Field 



Dec Hex Field 



<«>NM0Q019 0029 001D ICEOBJQ 

ICEDATA 0020 0014 ICERPHA 

ICEFLAGS 0028 001C ICERSC2B 

ICEOBJ 0004 0004 ICESIDE 



Dec 



Hex 



0012 000C ICESUBJ 0000 0000 

0024 0018 ICESUBJQ 0008 0008 

0036 0024 ICEUECBX 0032 0020 

0016 0010 



F lags and Masks 



Flag 



ICEFLAGS Flag Bytes 



ICESPEC 


X'80' 


Specific Accept 


ICEICX 


X'40' 


ICX is present 


ICELGON 


X'20' 


Aquire is LOGON Type 


ICERSC2F 


X'10' 


1=ICERSC2B is a Name 
O=no Name 


ICESTAPR 


X'08' 


Shoulder Tap 



$NM000?8 X'07' 



LCCW (ISTL CCW) 

Dec Hex 












LCCWOP 

Operafional 
Code-Control 


LCCWFLAG 

Flag Byte 


LCCWCNT 
Data Count 


LCCWDATA 
Data Address or Immed.Data 



Displacement List of Fields In ISTLCCW 

Dec Hex Field Dec Hex Field 



0000 0000 LCCWOP 



0001 0001 LCCWFLAG 0002 0002 LCCWCNT 
0004 0004 LCCWDATA 



Alphabetical List of Fields in ISTLCCW 
Field Dec Hex Field 

LCCWCNT 



Dec Hex Field 



0002 0002 LCCWDATA 0004 0004 LCCWFLAG 0001 0001 

LCCWOP 0000 0000 



Flags and Ma 


sks 








Flag 


Contains 


Mask 


Value 


Means 


LCCWFLAG 


Flag Byte 


LCCWCD 


X'80' 


Chain Data 






LCCWCC 


X'40' 


Chain Command 






LCCWCKPT 


X'20' 


Suppress 3705 Check 
Point Record 






LCCWNTVC 


X'10' 


Do not perform Valchek 






LCCWIDAT 


X'08' 


LCCWDATA Contains 
Data 






LCCWLSI 


X'04' 


LCCW Synch. Indicator 






LCCWHF.R 


X'04' 


POST=RESP 






LCCWRFI 


X'02' 


Request Feedback 
Indicator 






LCCWACI 


x'or 


Addition Command 
Indicator 


LCCWOP 


Operation Code - 
Control 


LCCWSI 


X'80' 


Sess Init/ Start 
Dialog Flag 






LCCWSD 


X'40' 


Sess Discon/End 
Dialog Flag 






LCCWRWOP 


X'3F' 


Read/ Write Operation 
Cede 






(3NM00001 


X'20' 


Reserved 






LCCWSOP 


X'10' 


Special Operation like 
Erase or Read Cont 






LCCWMODE 


X'OF' 


Control Type 






LCCWMODE 


X'OC 


Mode Type 






l.CCWTYPE 


X'03' 


Operation Type 



LCCW (ISTLCCW) ( Continued) 



Constants in 


ISTLCCW 




Label 


Value 


Meaning 


LXDQ 


X'3B' 


Reset Device Queue 


LXEC 


X'4B' 


Reset at End of Command 


LXO 


X'5B' 


Reset Orderly 


LCCWPRGE 


X'6B' 


Purge 


LWH 


X'OF' 


Write Header Indi. 1st Block 


LWRVI 


X'lF' 


Write RVI 


LWNA 


X'2F' 


Write Negative Ack 


LWAA 


X'3F' 


Write Alternate Ack 


LWPLG 


X'5F' 


Write Ack Leading Graphics 


LWNLG 


X'6F' 


Write Nack Ledaing Graphics 


LSMDE 


X'4F' 


Set Mode 


LIFBM 


X'7F' 


Indie 1st Block of Message 


LTEST 


XTE' 


Test LCCW 


LPRMPT 


X'13' 


Preempt LCCW 


LRSTR 


X'43' 


Restore LCCW 


LEXEC 


X'FF' 


Special Control Operation 


LREAD 


B'10' 


Read Type LCCW 


LWRITE 


B'OT 


Write Type LCCW 


LCNTRL 


B'lT 


Control Type LCCW 


LRESET 


B'1011' 


Reset Commands 


LTIC 


X'08' 


Logical Tic 


LWR 


B'ooooor 


Write Conversational 


LWB 


B'000101' 


Write Block 


LWM 


b'ooioot 


Write Message 


LWT 


B'oonor 


Write Transmission 


LEWM 


B-onoor 


Erase/Write Message 


LEWT 


B'omor 


Erase/Write Transmission 


LEAU 


B'oiooor 


Erase All Unprotected 


LRB 


B'ooono 1 


Read Block 


LRM 


B'OQIOIO 1 


Read Message 


LRT 


B'001110' 


Read Transmission 


LRMOD 


B'OIOOIO' 


Read Modified 


LRBUF 


B'oiono 1 


Read Buffer 


LRCONT 


B-onoio 1 


Read Continuous 


LRPEP 


B'onno' 


Read Perpetual 


LCPYM 


B'lOlOOT 


Copy Message 


LCPYT 


B'lOllOT 


Copy Transmission 


LD 


X'23' 


Disconnect 


LDEC 


X'33' 


Disconnect with End of Call 


LEOC 


X'53' 


End of Call Command 


LXEL 


X'OB' 


Reset Error Lock 


LXC 


X'lB' 


Reset Conditional 


LXI 


X'2B' 


Reset Immediate 


LC 


X'03' 


Contact 


LMT 


B'lT 


Transmission Mode 


LMS 


B'OO' 


Special Mode like Conv, EAU 


LMB 


B'OT 


Block Mode 


LMM 


B'lO' 


Msg or Continuous Mode 



LCCW (ISTLCCW) ( Continued) 

Constants in ISTLCCW (Continued ) 

Following Equates for - Port Solicitor (Dial) 
Port Solicitor Command Codes 
Label Value Meaning 



PSOL 
STCTL 
RESTCTL 
STIPUT 


X'FE' 

x'or 

X'02' 
X'03' 


Special Port Solicitor Command 
Start Control 

Reset & Control - Redrive 
Start Input 



Following Equates for SDLC Support 
Label Value Meaning 



LCCHOLD 


x'or 


Hold 


LCCRHOLD 


X'02' 


Release Hold 


LSEND 


X'Fl' 


Send 


LCLEAR 


X'F2' 


Clear 


LCRUD 


X'F3' 


Clear, Unbind 


LCRUDNFY 


X'F4' 


Clear, Unbind, Notify 


LNFY 


X'F5' 


Notify 


LRELCB 


X'F6' 


Release CB 


LRESTSR 


X'F7' 


Resetsr 


LCLRNFY 


X*F8' 


Clear/Notify 


LCHPUR 


X'F9' 


Purge 


LCCWSIZE 


8 


LCCW size 


LRDS 


X'FF' 


Record dev stats command 



LCPB (ISTLCPB) 



LCPTYPE 
Type Code 



LCPLNGTH 
Length In 
Bytes 



LCPFLAGS 
Flag Byte 



LCPMNRCD 
LCP Minor 
Refection Code 



LCPCHAIN 
APS Chain 



LCPRUNCT 
Number of RU 
for this LCPB 



LCPRRCCT 
Count of 
Responses 
Received 



LCPFOSN 
Sequence Number First RU 



LCPRRCNT 
Count of 
Responses 
Requested 



LCPFLAG2 
Second Flag 
Byte 



LCPFSNCH 
1st Seq Number in RU Chain 



LCPCID 
Communication ID 



LCPNXLCW 
Address Next LCCW 



LCPFLCCW 
Internal DOS TPIOS Pointer to 1st LCCW 



LCPFDBA 
BTU Address 



LCPFLGS 
Flags 



LCPRSV03 
Reserved 



LCPRSV02 
Reserved 



LCPFLGI 
Flags 



LCPSEQ 
Outbound Sequence Number 



LCPRSV77 
Reserved 



LCPRVPT1 
Reserved 



LCPCLREP 
Pointer to Clear LCPB in UCB 



LCP3270A 
Reserved 



LCPB (I5TLCPB) ( Continued) 



Dec Hex 
52 34 



LCP3270B 
Reserved 



LCPTPIOS 
Reserved 



LCPLCCW 
First 



Or g LCPCID 



LCPSAF 
Source Identification 



LCPDAF 
Destination Identification 



Org LCPFLCCW 



LCPUBFSB 
Unbind FSB Address 



Or g LCPLCCW 



LCPRSTQA 
Reset Purge Queue Anchor 



LCPPABA 
TPIOS PAB Address (Reset) 



Or g LCPPABA 



LCPRPHA 
RPH Pointer 



LCP8 (1STLCPB) ( Continued) 



Displacement List of Fields ir 


.ISTLCPB 










Dec 


Hex 


Field. 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


0000 


0000 


LCPTYPE 


0016 


0010 


LCPSAF 


0037 


0025 


LCPFLG1 


0001 


0001 


LCPLNGTH 


0016 


0010 


LCPCID 


0038 


0026 


LCP RS V77 


0002 


0002 


LCPFLAGS 


0018 


0012 


LCPDAF 


0040 


0028 


LCPRVPT1 


0003 


0003 


LCPMNRCD 


0020 


0014 


LCPNXLCW 


0044 


002C 


LCPCLREP 


0004 


0004 


LCPCHAIN 


0024 


0018 


LCPUBFSB 


0048 


0030 


LCP 3270 A 


0008 


0008 


LCPRUCNT 


0024 


0018 


LCPFLCCW 


0052 


0034 


LCP3270B 


0009 


0009 


LCPRRCCT 


0028 


001 C 


LCPFDBA 


0056 


0038 


LCPTPIOS 


0010 


000A 


LCPRRCNT 


0032 


0020 


LCPFLGS 


0060 


003C 


LCPRSTOA 


0011 


000B 


LCPFLAG2 


0033 


0021 


LCPRSV02 


0060 


003C 


LCPLCCW 


0012 


OOOC 


LCPFOSN 


0034 


0022 


LCPSEQ 


0064 


0040 


LCPRPHA 


0014 


OOOE 


LCPFSNCH 


0036 


0024 


LCPRSV03 


0064 


0040 


LCPPABA 



Alphabetical List of Fields in ISTLCPB 



Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


LCPCHAIN 


0004 


0004 


LCPFSNCH 


0014 


OOOE 


LCPRSV03 


0036 


0024 


LCPCID 


0016 


0010 


LCPLCCW 


0060 


003C 


LCPRSV77 


0038 


0026 


LCPCLREP 


0044 


002C 


LCPLNGTH 


0001 


0001 


LCPRUCNT 


0008 


0008 


LCPDAF 


0018 


0012 


LCPMNRCD 


0003 


0003 


LCPRVPT1 


0040 


0028 


LCPFDBA 


0028 


001C 


LCPNXLCW 


0020 


0014 


LCPSAF 


0016 


0010 


LCPFLAGS 


0002 


0002 


LCPPABA 


0064 


0040 


LCPSEQ 


0034 


0022 


LCPFLAG2 


0011 


000B 


LCPRPHA 


0064 


0040 


LCPTPIOS 


0056 


0038 


LCPFLCCW 


0024 


0018 


LCPRRCCT 


0009 


0009 


LCPTYPE 


0000 


0000 


LCPFLGS 


0032 


0020 


LCPRRCNT 


0010 


000A 


LCPUBFSB 


0024 


0018 


LCPFLG1 


0037 


0025 


LCPRSTQA 


0060 


003C 


LCP3270A 


0048 


0030 


LCPFOSN 


0012 


OOOC 


LCPRSV02 


0033 


0021 


LCP3270B 


0052 


0034 



LCPB (ISTLCPB) ( Continued) 



Flags and Masks 








Flag Contains 


Mask 


Value 


Means 


LCPCHAIN APS Chain 


LCPCHNG 


X'80' 


Gate Bit 


LCPFLAGS Flag Byte 


LCPLOGIC 


X'80' 


LCP Logic Error 




LCPCBLK 


X'40' 


LCP ControJ Block 
Error 1 




LCPFBIND 


X'20' 


Free Block Indicator 




LCPRJECT 


X'10 1 


LCPB Rejected 
Flag 




LCPCRFLG 


X'10' 


Rejected Contact 
Request 1 




LCPMDRST 


X'08' 


LCP has been reset 




LCPRESET 


X'04 1 


Reset Request LCP 




LCPDTRCE 


X'02 1 


Device Trace 
Required 




LCPREQOK 


x-or 


Request handled as 
NOOP, Completion 
O.K. 


LCPFLAG2 Second Flag 


LCPPRFLG 


X'80' 


Pacing Required 


Byte 


LCPASYN 


X'40' 


Asynchronous LCPB 




LCPRSTRT 


X'20 


Restart LCPB 




LCPTLBPI 


X'10' 


TPIOS Block LCCW 




LCPFIDO 


X'08' 


FIDOTH Indicator 
for Record 




ONM00002 


X'07' 


Reserved 


LCPFLGS Flags 


LCPEXRES 


X'80* 


Exception Response 
Spec. 




LCPDSTAT 


X'40' 


Dialogue State Bit, 
0= Req. Reject, 
l=State Error 




LCPFREE 


X'20' 


Deallocate LCPB 




LCPATOP 


XMO' 


ATOP LCPB 




LCPRSV01 


X'OF' 


Reserved 


LCPFLG1 Flags 


LCPRSV04 


X'80' 


Reserved for Aligment 




LCPINTER 


X'40' 


Internal LCPB 




LCPRSV05 


X'3F' 


Reserved 


LCPRPHA RPH Pointer 


LCPFTYPE 


X'80' 


Feedback Type 



LCPB (ISTLCPB) ( Continued) 



Constants in ISTLCPB 



Meaning 



Constants for LCPTYPE 



LCRPHFT 


B'l' 


LCPABFT 


B'O' 


LCPBFIRM 


X'10' 


LCPTERM 


X'll' 


LCTYPE 


X'04' 


LCPCLACB 


X'04' 


P LCPTYPE 


X'28' 


LCPETYPE 


X'40' 



LU Failed, CLSDST, Sched Los Ter, OPNDST 

may be tried 

Term Received, CLSDST, Sched Lost Term 

LCPB from Close ACB 
Purge LCPB Type ID 
Extended LCPB Type IF 



Minor Return Codes 



LCMCRSTR 


X'F7' 


LCPMNEW 


X'02' 


LCPMNPF 


X'03' 


LCPMNAS 


X'04' 


LCPMNCL 


X'06' 


LCPMNVD 


X'07' 


LCPMNTF 


X'10' 


LCPMNTS 


X'l.r 


LCPMNAP 


X'OA' 


LCPMNPR 


X'OB' 


LCPMNRE 


X'OC 



Minor RC for RESETSR 

Early Warning, Recovery in Progress 

Perm. I/O Failure 

Auto Network Shutdown 

Close/CLSDST Occurred 

Vary Deactivate 

Temp Record Device Failure 

Terminate Self 

Appl. Issued Clear 

Preempt 

Restore 



NCB (ISTNCB) 



Dec Hex 




12 C 

16 10 

20 14 

24 18 

28 1C 

32 20 

36 24 



NCBTYPE 
Control block 
type code 



NCBLNGTH 
Length In bytes 



NCBDAF 
ID of destination 



NCBRDTE 
Address of RDT entry 



NCBTSKID 
Task ID 



NCBNSNA 
Address of next schedulable node 



NCBFMCBA 
Address of first FMCB 



NCB NCB A 
Cid of next same/lower level 
node I 



NCBNCSL 
Cid of next same/level 
node I 



NCBFLAGS 
Common NCB flags 



NCBRVPT1 
Count of last trace records 



NCBLTRC 
Lost trace record count 



NCBFMCBP 
Address of port solicitor FMCB 



NCBDEVCH 
Node Dev Char 



ORG NCBFLAGS 



NCBCSTAT 
Connection 
status flag 


NCBFRAS 
RAS flag 



ORG NCBFRAS 



ORG NCBFTRIO 



NCBFTRIO 

l-O trace active 

this node 



NCBFLTIO 

l-O trace active 

this node 



ORG NCBFLAGS + 2 



ORG NCBFLAGS + 3 



NCBFLAG1 
NCB flags 



NCBNMLLN 
Number of lower 
level nodes 



NCB (ISTNCB) (continued) 



Flags and masks 










Disp. Flag 


Contains 


Mask 


Value 


Means 


26(1 A) NCBFLAG1 


NCB flags 


NCBSNAI 
NCBCONF 
NCBRSTRT 
@NM00025 


X'80' 
X*40' 
X'20 1 
X'lF' 


Old node 
Node sick flag 
Recovery in progress 
Reserved 



Constants in ISTNCB 



Label 


Value 


Meaning 


LDTYPE 


X'07' 


Type code for LDNCB 


ICTYPE 


X'06' 


Type code for ICNCB 


DNTYPE 


X'05' 


Type code for DNCB 


HCTYPE 


X'14' 


HCNCB type 


CCTYPE 


X'15' 


CCNCB type code 


LUTYPE 


X'25' 


LUNCB type code 


NCNOTRC 





No trace required 



Dec Hex 




84 54 

88 58 



OR G NC SA P BUE 



NCSAPSA 
Save area 



NCSAPECB 
ECB 



NCSAPTXT 
Dump data 



NCSAPEND 
High storage address 



NCSAPPAB 
BNN vary PAB address only 



NCSRSV04 
Reserved 



NCSAPRU 
IPL CMD RU prefix 



NCSAPDAT 
Resp for dump, O/B load 



Constants in NCSAPP 



General constants 
NCSWASZ X'0578' NCSPL work area size 

Constants for verb codes 
NCSPLVCO X'OO' Error 

NCSPLVC1 X'OT Vary 

NCSPLVC2 X'02' Modify 

NCSPLVC3 X'03' ERP 

NCSPLVC4 X'04' Display 



NCSAPP (continued) 



Constants in NCSAPP (continued) 



Meaning 



Constants for verb codes (continued) 



NCSPLVC5 


X'05' 


Status to SM 


NCSPLVC6 


X'06' 


Internal CMD 


NCSPLVC7 


X'07' 


Init/term TUSM 




Constants for 


vary command modifiers 


NCSVACT 


X'OOOT 


Activate 


NCSVDEA 


X'0002 1 


Deactivate 


NCSVLON 


X'0004' 


Logon 


NCSWPP 


X'0080' 


Vary normal cleanup reqst 


NCSVIMM 


X'0010' 


Immediate 


NCSVINT 


X*0020' 


Internal only 


NCSVALO 


X'0005' 


Activate with logon 


NCSVDEI 


X'0012' 


Deactivate immediate 


NCSVDII 


X'0032' 


Deactivate immediate intern 


NCSCNOTF 


XTFF8' 


Notify request 




Constants for 


modify command modifiers 


NCSMDUM 


X'0001' 


Dump 3705 


NCSMCHA 


X'0004' 


Change 


NCSMNSY 


X'0008' 


Netsol = YES 


NCSMNSN 


X'0010' 


Netsol = NO 


NCSMTRY 


X'0020' 


Trace = YES 


NCSMVTRY 


X'1020' 




NCSMVTRN 


X'1040' 




NCSMTRN 


X'0040' 


Trace = NO 


NCSMTPR 


X'0100' 


Trace print 


NCSMTST 


X'0080' 


Modify test 




Constants for ERP command modifiers 


NCSEERRA 


X'OOOT 


ERP request 


NCSECLOR 


X'0002' 


Vary normal close request 


NCSEDACT 


X'0004' 


ERP deactivate request 


NCSERSTR 


X'0008' 


RSTRT entry from DLR proc 




Purge minor return codes constants 


NCSAPABN 


X'05' 


Application abend 


NCSCLDST 


X'06' 


Close dest occured 


NCSDDISC 


X'08' 


Dial disconnect occured 


NCSBTHEX 


X'09' 


Buffer threshold exceeded 




I/O or restart return codes constants 


NCSIOSUC 


X'OO' 


I/O successful 


NCSIOERR 


X'04' 


I/O error 


NCSIOPRG 


X'08' 


I/O purged 


NCSRSSUC 


X'OO' 


Restart successful 


NCSRSERR 


X'04' 


Restart error 


NCSVAIPL 


X'OO' 


IPL no restart on vary ACTV 


NCSVANRA 


X'10' 


IPL successful, no restart 


NCSVAWMF 


X'08' 


Warm start failure for 


NCSVAIPF 


X'OC 


IPL failed on vary activate 


NCSDSIA 


X'14' 


Invalid address specified 


NCSVAISZ 


X'08' 


NCP size too large 


NCSIPLSC 


X'OO' 


IPL successful 


NCSIDER 


X'OC 


I/O error on remote IPL 
11-106 



NCSAPP (continued) 



Constants in 1 


NCSAPP (contii 


nued) 


Label 


Value 


Meaning 




I/O or restart 


return cedes constants (continued) 


NCSNCPAC 


X'04' 


Remote NCP already active 


NCSNCRPF 


X'70' 


Remote power off 




Constants for 3600 support 


NCSES 


X'OOOT 


End session 


NCSBF 


X'0002' 


Bind failure 


NCSUF 


X'0004' 


Unbind failure 


NCSINIT 


X'OOOT 




NCSTERM 


X'0002' 




NCSTPPST 


X'0001' 


TPPST command 


NCSII 


X'0002' 


IPL IN IT command 


NCSIT 


X'0004' 


IPL command 


NCSIF 


X'0008' 


IPL final command 


NCSDI 


X'0010' 


Dump IN IT command 


NCSDT 


X'0020' 


Dump text command 


NCSDF 


X0040" 


Dump final command 


NCSCON 


X'0080' 


Contact command 


NCSDICON 


X'0100' 


Discontact command 


NCSMSFMD 


X'0200' 


Send FMD 


NCSMSSUP 


X'2000' 


Constant for MSG SUP 


NCSCRDS 


X'301B' 


Record DEV stats command 


NCSCQUIS 


X'FOIA' 


QUIESCE command 


NCSNC 


X'04' 


Not contacted 


NCSLD 


X'OO' 


Contacted loaded 


NCSNLD 


X'OO' 


Contacted needs load 


NCSNCD 


X'08' 


Not contacted due to deact 


NCSNCE 


X'10' 


Not contacted due to ERP 



Constants for IORC for display storage 
NCSDSDEA X'OC Prior deact 

NCSDSFAL X'04' Fail other than prior deact 

Type codes for configuration restart 
NCSCTRLM X'OT Change DEV trans limit 

NCSCNPOL X'02' Change neg poll resp limit 

NCSCSESS X'03' Change session limit 

NCSCPOLL X*04' Change line serv seek pause 



FM data command codes 



NCSCAPU 


X'DOOT 


AG PHYS 


NCSCDPU 


X'D002' 


Deact PHYS 


NCSCALU 


X'D003' 


Act log 


NCSCDLU 


X'D004' 


Deact log 


NCSCSDT 


X'D005' 


SDT 


NCSCFME 


X'2006' 


Send POS resp 


NCSCEXCP 


X'2007' 


Send neg resp 


NCSCCON 


X'3008' 


Contact 


NCSCDCON 


X'3009' 


Discontact 


NCSCIPLI 


X'300A' 


IPL init 


NCSCIPLT 


X'300B*. 


IPL 


NCSCIPLF 


X'300C 


IPL final 



NCSAPP (continued) 



Constants In NCSAPP ( continued) 


Label 


Value 


Meaning 




FM data command codes (continued) 


NCSCDUMI 


X'300D' 


Dump init 


NCSCDUMP 


X'300E' 


Dump 


NCSCDUMF 


X'300F' 


Dump final 


NCSCACTL 


X'3010' 


Act link 


NCSCDACL 


X'301T 


Deact link 


NCSCSSV 


X'3012' 


Set state vector 


NCSCNSP 


X'3013 1 


NS proc error 


NCSCSTD 


X'3019' 


Set time and date 


NCSCSEP 


X'9014' 


Switch to EP 


NCSCSNC 


X'9015' 


Switch to NCP 


NCSCLSD 


X'3016' 


Line sched parm 


NCSCDS 


X'3017' 


Display storage 


NCSCPWO 


X'3018' 


Remote power off 


NCSSNFMD 


X'301C 


Send FMD 


NCSNCPPG 


X'FFFF' 


Purge 




New val 


ues for NCSPLCMD 


NCSCLCND 


X'0041' 


Load conditionally 


NCSCUCND 


X'0042' 


Load conditionally 


NCSCRSRT 


X'0043' 


Restart 370X or clus 


NCSDUCMD 


X'0044' 


Dump 370X 


NCSCERPP 


X'0045' 


Perform ERP dump and 


NCSLDAOK 


X'OO' 


Command processed success 


NCSLDACT 


X'04' 


NCP active-load not PERF 


NCSLDCAN 


X'04' 


Reload declined by oper 


NCSLDIOP 


X'08' 


I/O purged 


NCSLDNOG 


X'OC 


Command failed 


NCSDUCOM 


X'14' 


Dump complete 


NCSHALTD 


X'18' 


CMD rejected, halt in prog 


NCSUNREC 


X'lC 


Command unrecognized 


NCSNOSTG 


X'20' 


CMD rej, ins uff storage 




New values for NCSPRMRC 


NCSFIRM 


X'10' 


Restart succ, opendst req 


NCSEWRN 


X'll' 


Con lost, recov in prog 




Constants for trace 


NCSACTLT 


X'0820' 


Activate line trace 


NCSDACLT 


X'0840' 


Deactivate line trace 


NCSCACLT 


X'301D' 


SSCP act line trace 


NCSCDCLT 


X'301E' 


SSCP deact line trace 



NCSPL (ISTNCSPL) 



Dec Hex 




NCSPLVFL 
Command flags 



44 2C 

48 30 

52 34 

50 38 

60 3C 



NCSPFX 
Queue element prefix 



NCSPLSID 
DOS =X'00' 
(Console ID ) 



NCSPLVCD 
Verb code 



NCSPLVF1 
Special proc flags 



NCSPLVBF 
Verb modifier flags 



NCSPRMRC 

Purge minor 

return code field 



NCSIORC 
I/O or restart 
return code 



NCSRRNPT 
Address RN entry for line trace 



NCSPLRID 
ID = 'nodename' 



NCSPLLID 
Loggon = 'nodename' 



NCSPLRPT 
ID = 'nodename' rdte address 



NCSPLLPT 
Loggon/logoff = 'nodename' rdte address 



NCSPLCMD 
3705 control command codes 



NCSPLFL3 I NCSNCPEP 
Flag byte EP subchannel address 



NCSMSGSP j 

Reserved for message 

surpression J 



NCSPLUAD 
U = 'unit address' 



NCSPLWRE 
WTOR ECB 



136 88 
140 8C 



NCSPLWRF 
WTOR reply area 



NCSPLRAD 
Rdte PTR for allocate/deallocate 



NCSIOCID 
Current CID for DAF lock held 



NCSPL (ISTNCSPL) (continued) 















Dec 


Hex 
90 

94 

98 

9C 

AO 

A4 

A8 

AC 

BO 

B4 

B8 

BC 

CO 

C4 

C8 

CC 

DO 





1 


2 


3 


144 


NCSPLWKA 
NCS work area address 


148 


NCSPLCVT 
Pointer to VTAM CVT 


152 


NCSPLRPH 
Pointer to RPH 


156 


NCSPLECB 
ECB for vary PGS 


160 


NCSPLFSB 
Address of init/term. PSB 


164 


NCSPLRCR 
Address rdte for CR 


168 


NCSPLFL1 
Vary flags 


NCSPLFL2 
Vary flags 


NCSPLOLN 
Length O/B RU 


172 


NCSPLP1 
Address vary PAB 


176 


NCSPLP2 
Address D/l/R PAB 


180 


NCSPLP3 
Address ERP PAB 


184 


NCSPLSPL 
Address assoc. NCSPL 


188 


NCSPLWEL 
Address post RPH 


192 


NCSPLRRP 
Address remote RN rdte in local RDT 


196 


NCSPLRUO 
Address O/B RU 


200 


NCSPLRUI 
Address buffer for l/B RU 


204 


NCSPLAPP 
Address NCSPL appendage 


208 


NCSRNAME 
RNAME = from vary activate 



NCSPL(ISTNCSPL) (continued) 



Dec Hex 
216 D8 






1 


2 


3 


Sequence 


NCSPLSQN 

= NR for response 


NCSPLR99 
Reserved 


NCSPLNSN 
Rdte NSNEA at CLSDST 


NCSRVPT4 
Reserved 



ORG NCSPLRAD 



NCSLSCMD 

Line sched 

command type 


NCSPLRCD 
Hex value for 
line sched PARAM 



OR G NCSIOCID 





NCSPLCID 
Alias for above 


OR 


3 NCSPLCID 






NCSPLSAF 
Source address 


NCSPLDAF 
Destination address 



Flogs and masks 
Disp. Flag 



52(34) NCSPLCMD 3705 control command NCSPLSYS 
codes 



168(A8)NCSPLFL1 Vary flags 



169(A9)NCSPLFL2 Vary flags 



Mask 


Value 


Means 


NCSPLSYS 


X'80' 


On-system off-fm 


NCSPLCTL 


X'40' 


On-control off -data 


NCSPLSYN 


X'20' 


On-synchr off-asynchr 


NCSPLFLO 


X'10' 


On-with flow off- 
against flow 


NCSPL2IN 


X'80' 


Second entry 


NCSPLSOM 


X'40' 


Supress OP. message 


NCSPLEBN 


X'20' 


Entry from BNN SSCP 


NCSPLREQ 


X'10' 


NCSPL from restore 


NCSPLNON 


X'08' 


Do not addr RDT segment 


NCSPLAPU 


X'04' 


Activate physical done 
by load 


NCSPL2CN 


X'02' 


Second contact request 


NCSPLPOS 


x'or 


BNN posted 


NCSPLVOP 


X'80' 


NCSPL on vardef PAB 


NCSPLRSF 


X'40' 


No sick clear before I/O 


NCSPLRIO 


X'20' 


I/O = restart I/O 


NCSOUFMC 


XMO' 


Purge only user FMCB 


NCSPLDS 


X'08' 


1 = CIO saved response 
data 


NCSREMPO 


X'04' 


Remote power off spec 
by order 


NCSPLVIS 


X'02' 


Vary IMM start caller 
of CVP 


NCSPLVIT 


x'or 


Vary IMM term called 
of CVP 



NCSPL (ISTNCSPL) (continued) 



Flogs and masks 

Disp. Flag Contains 

54(36) NCSPLFL3 Flag byte 

18(12) NCSPLVBF Verb mod if er flags 



20(14) NCSPLVFL Command flags 



21(15) NCSPLVF1 Special proc flags 



NCSPLMOM 


X'80' 


ERP caused by failure 
of higher node 


NCSEPP 


X'40' 


1 = EP subchannel present 


(@NM00010 


C3F' 


Reserved 


NCSVBF01 


X'80' 


Unused 


NCSVBF02 


X'40' 


Unused 


NCSVBF03 


X'20' 


Modify MSG SUP 


NCSVBF04 


X'10' 


Type = VTAM 


NCSVBF05 


X'08' 


Linetrace = 1 


NCSVBF06 


X'04' 


I/O trace = 1 


NCSVBF07 


X'02' 


Buffer trace = 1 


NCSVBF10 


X'40' 


Modify trace = NO 


NCSVBF11 


X'20' 


Vary internal only & 
modify trace = YES 


NCSVBF12 


X'10' 


Vary immediate & 
modify netsol =NO 


NCSVBF13 


X'08' 


Modify netsol = YES 


NCSVBF14 


X'04' 


Vary logon & modify 
change 


NCSVBF15 


X'02 1 


Vary deactivate & 
vary normal close (ERP) 


NCSVBF16 


X'01' 


Vary activate & 

ERP request & modify DUMP 


NCSVNCSA 


X'80' 


NCSPL is active 


NCSVDEL 


X'40' 


Delete NCSPL 


NCSVSTAT 


X'20' 


Indicate NCSPL was 
not getmained 


NCSRSV01 


X'10' 


Reserved 


NCSRSV02 


X'OF' 


Reserved 


NCSOVFMC 


X'80' 


Purge only vary's FMCB 



PAB (1STPAB) 















Dec 


Hex 


8 
C 













PABWQCHN 
CPS Swap Field for NEQ&CHN 


8 


PABCHNGP 
PSS Chain Pointer 


ORG OVERIAP 


12 


PABRPHFG 
Sched Flags and RPH 




Org 


PABWQCHN 






4 


PABWEQA 
Work Element Queue Address 


4 


PABWEQP 
WKELPtr 






Org 


PABWQCHN+4 




4 


4 


PABCHAIN 
APS Chain 




Org 


ISTPAB+8 


8 


8 


PABOFFST 
Offset from 
Control Block 


PABDVTA 
DVT Address 




Org 


PABRPHFG 




12 


C 


PABFLAGS 
Scheduling 
Flags 






Org 


PABRPHFG+1 




13 


D 


PABRPHA 
RPL Header Address 



PAB (ISTPAB) ( Continued) 

Displacement List of Fields in ISTPAB 

Dec Hex Field Dec Hex Field 



Dec Hex Field 



0000 0000 PABWEQA 0008 0008 PABOFFST 0012 000C PABRPHFG 

0000 0000 PABWQCHN 0008 0008 PABCHNGP . 0013 000D PABRPHA 

0004 0004 PABCHAIN 0009 0009 PABDVTA 

0004 0004 PABWEQP 0012 000C PABFLAGS 



Alphabetical List of Fields in ISTPAB 
Field Dec Hex Field 



Dec Hex Field 



Dec 



Hex 



PABCHAIN 0004 0004 PABOFFST 

PABCHNGP 0008 0008 PABRPHA 

PABDVTA 0009 0009 PABRPHFG 

PABFLAGS 0012 OOOC PABWEQA 



0008 0008 PABWEQP 0004 0004 

0013 000D PABWQCHN 0000 0000 

0012 OOOC 

0000 0000 



Flags and Masks 








Flag Contains 


Mask 


Value 


Means 


PABCHAIN APS Chain 


PABCHNG 


X'80' 


Gating Bit 




PABRESCH 


X'40' 


Reschedule Pab at TPEXIT 




PABCDP 


X'20' 


Close DST/Change in 
Progress 




PABUNCON 


X'10' 


Unconditionally Reschedule 
PAB at TPEXIT 




PABRESET 


X'08' 


Reset Issued on this PAB 




PABRSV02 


X'07' 


Reserved 


PABFLAGS Scheduling Flags 


PABAPYP 


X'80' 


Application us a User Exit 




PABPRIOR 


X'40' 


Immediate Priority 




PABNORPR 


X'20' 


Normal Priority - 
Reschedua table 




PABDYNAM 


X'10' 


Dynamic 




PABSSN 


X'08' 


System Services 




PABERLCK 


X'04' 


PAB Error Lock Flag 




PABERRLK 


X'04' 


Error Lock 




PABERLOK 


X'04' 


Error Lock 




PABINHBT 


X'02' 


l=lnhibit Traffic, 
0=No 




PABNODQ 


x'or 


Do not DEQ Work 
Element 


PABWEQA Work Element 


PABWEQG 


X'80' 


Gating Bit 


Queue Address 


PABRSV01 


X'7F' 


Reserved 



PAB (ISTPAB) ( Continued) 



Constants in ISTPAB 



Label 

PABWEQGO 

PABWEQ1 

PABCHNGO 

PABCHNG1 

PAB RES CO 

PABRESC1 

PABCDPO 

PAB CD PI 

PABERLKO 

PABERLK1 

PAB UN COO 

PAB UN C0 1 

PAB PR I RO 

PABPRIR1 

PABRSTO 

PABRST1 



Value 

X'7FFFFFFF' 
X'80000000' 
X'7FFFFFFF' 
X'80000000' 
X'BFFFFFFF' 
X'40000000' 
X'DFFFFFFF' 
X' 20000000' 
X'FBFFFFFF' 
X'04000000' 
X'EFFFFFFF' 
X' 10000000' 
X'BFFFFFFF' 
X'40000000' 
X'F7FFFFFF' 
X'08000000' 



Meaning 

Turn PABWEQG Off 
Turn PABWEQG On 
Turn PABCHNG Off 
Turn PABCHNG on 
Turn PABRESCH Off 
Turn PABRESCH On 
Turn PABCDP Off 
Turn PABCDP On 
Turn PABERRLK On 
Turn PABERRLK Off 
Turn PABUNCON Off 
Turn PABUNCON On 
Turn PAB Prior Off 
Turn PAB Prior On 
Turn PABRESET Off 
Turn PABRESET On 






1 


2 


3 


PIBFLG 
F lag byte 


PIBCNCL 
Cancel code 


PIBLOGID 
SYSLOG indentifier 


PIBDATFL 
Flags for VM 
support 


PIBSAVE 
Address of SAVE area 


PIBNOC 
Number of 
core blocks 


PIBORP 
Origin of partition 


PIBASS 
Assign flags 


PIBLUBID 
User lub index 


PIBLUBND 
Nbr of user lubs 


PIBFLG2 
More flags 



PIBOSAVE 
For attn rtn, PTR to user save area 



Disp. Flag 

4(4) PIBDATFL 

0(0) PIBFLG 

15(0F) PIBFLG2 



Flags for VM support 


PIBTRAM 


X'80 


Partition in virtual mode 




(3NM00006 


X7F 


Reserved 


F lag byte 


@NM00005 


X'FE 


Not used 




PIBIOCMP 


X'01 


I/O completion 


More flags 


PIBFLG20 


X'80 


Reserved 




PIBFLG21 


X'40 


Reserved 




PIBFLG22 


X'20 


Reserved 




PIBFLG23 


X'10 


Reserved 




PIBFEOJ 


X'08 


Fetch EOJ 




PIBTASK 


X'04 


Cancel task 




PIBFLG26 


X'02 


Reserved 




PIBFLG27 


X'01 


Reserved 



Constants in ISTPIB 



PIBVFORC X'40' 
PIBVSNOC X'41' 



VTAM sympathetic forced cancel 

Cancel due to VTAM should-not-occur condition 



VTAM cancel should-not-occur function codes 
I denotes SND in inbound code 
O denotes SND in outbound code 
PIB denotes DOS/VS TPIOS module 
The hex value of the code is structured 



PIB (ISTP1B ) (continued) 

Constants (continued) 

Label Value Meaning 

Where BIT-0 represents = inbound, 1 = outbound 
BIT - I represents =TPIOS, 1 =non-TPIOS 
BITS 2 -3 00=DOS/VS 

01 = VS/1 
10=VS/2 
1 1 = Common 
BITS 4 - 15 = Function code value 
PIE 1 1242 X'04DA' RTN code GT from rest 



ISTPICCA 




PIEI2010 


X'07DA' 


RC^OCIDCTLfind 


PIEI2015 


X'07DF ' 


RC>OCIDCTL finish 


PIEI2020 


X'07E4' 


RC^OCIDCTLfind 


PIEI2025 


X'07E9' 


RC>OCIDCTL finish 


PIEI2030 


X'07EE' 


RC^>0 Relstore 


PIEI2035 


X'OTFS' 


RC>OCIDCTL finish 


PIE 12040 


X'OTFS' 


RC>0 relstore 


PIE 12045 


X'07FD' 


RC>0CIDCTL finish 


PIEI2050 


X'0802' 


RC^OCIDCTLfind 


PIE 12060 


X'080C 


RC>0 relstore 


PIE 12070 


X'0816' 


RC>OCIDaLfind 


PIEI2080 


X'0820' 


Work element invalid 


PIEI2090 


X'082A' 


RC>8 reqstore 


ISTPICCE 




None 






ISTPICCF 




PIE 10230 


X'00E6' 


RC>0TPLOCK 


ISTPICCI 




PIEI3510 


X'00B6' 


LRA error 


ISTPICCO 




PIEO0020 


X'8014' 


RC > 8 reqstore 


PIEO0030 


X'801E' 


RC>8 reqstore 


PIEO0045 


X'8028' 


RC>8 reqstore 


PIEO0050 


C'8032' 


RC>8 reqstore 



PIB (ISTPIB ) (continued) 



(continued) 



Label 



Value 



Meaning 



ISTPICCO (continued) 

PIEO0055 X'8037' RC> 8 reqstore 

PIEO0060 X'8030' RC > 8- reqstore 

PIEO0065 X'8041' RC> 8 reqstore 

PIEO0070 X'8046' RC> 8 reqstore 



ISTPICCS 




PIEO0120 X'8078' 


RC>8 reqstore 


PIEO0130 X'8082' 


RC>8 reqstore 


PIEO0140 X'8086' 


RC>8 reqstore 


PIEO0150 X'8096' 


RC>8 reqstore 



iSTPica 



ISTPICCU 




PIE 10420 


X'01A4' 


RC>8 reqstore 


PIE 10430 


X'OIAE' 


CSOL FMCB not found 


ISTPICDD 




PIEI1910 


X'0776' 


RC> 8 reqstore 


PIE 1 1920 


X'0780' 


RC>0CIDCTLfind 


PIE 11930 


X'078A' 


ROO CIDaL finish 


ISTPICDR 




PIE 10510 


X'OIFE' 


RC>8 reqstore 


PIE 10520 


X'0208' 


RC>0 CIDaL find 


PIE 10530 


X'0212' 


RC>0 relstore 


PIE 10540 


X'0210' 


RC>0 relstore 


PIE 10550 


X'0226' 


RC>0 CIDaLiind 


ISTPICEI 




PIEI0610 


X'0262' 


RC>8 reqstore 


PIE 10620 


X'0260' 


RC>8 getstor 


PIE 10630 


X'0276' 


RC>0 relstore 


PIE 10640 


X'0280' 


RC>0 relstore 


ISTPICES 




PIE 13450 


X'0D7A' 


Invalid input NCB 


PIE 13460 


X'0D84' 


RO 8 reqstore 


PIE 13470 


X'0D8E' 


ROO relstore 


ISTPICF1 




PIE 10720 


X'0200' 


ROO CIDCTL find 


PIE 10730 


X'020A' 


ROO CIDaL find 


PIE 10740 


X'02E4' 


ROO relstore 


PIE 10750 


X'02EE' 


ROO CIDaL finish 


PIE 10760 


X'02F8' 


ROO CIDaL finish 


PIE 10770 


X'0302' 


RC>0 CIDaL finish 


PIE 10780 


X'030C 


ROO relstore 



PIB (ISTPIB) (continued) 



Constants 


(conti 


nued) 


Label 


Value 


Meaning 


ISTPICGI 




PIEO0210 


X'80D2' 


RC>OTPDVTS 


PIEO0220 


X'80DC 


RC>0 TPDVTS 


PIEO0230 


X'80E6' 


RC>0 relstore 


PIEO0240 


X'80F0' 


RC>8 reqstore 


PIEO0250 


X'80FA' 


RC>0CIDCTL finish 


PIEO0260 


X'8102' 


RC>0 CIDaL finish 


ISTPICGP 




PIEI0810 


X'032A' 


RC>8 from reqstore 


PIEI0815 


X'032F' 


RC>0CIDCTL finish 


PIE 10820 


X'0334' 


RC>0 TPDVTS 


PIE 10825 


X'0339' 


RC>0 CIDaL finish 


PIEI0830 


X'033E' 


Dsconnect cmmd. in error 


PIEI0835 


X'0343' 


RO0 CIDCTL finish 


PIE 10837 


X'0345' 


RC>0 CIDaL find 


PIEI0838 


X'0346' 


RC>0 CIDaL finish 


PIE 10840 


X'0348' 


RC>8 from reqstore 


PIE 10845 


X'034D' 


RC>0 CIDaL finish 


PIEI0850 


X'0325' 


RC>0 CIDaL find 


PIEI0855 


X'0357' 


RC>0 CIDaL finish 


PIE 10860 


X'0350' 


RC>0 CIDaL find 


PIE 10865 


X'0361 1 


RC>0 CIDCTL finish 


PIE 10870 


X'0366' 


RC^O CIDaL find 


PIE 10875 


X'0368' 


RC>0 CIDaL finish 


PIE 10880 


X'0370' 


RC>0 CIDaL find 


PIEI0885 


X'0375' 


RC>0 CIDaL finish 


PIE 10890 


X'037A' 


RC>0 CIDaL find 


PIE 10895 


X'0384' 


RC>0 from relstore 


ISTPICGR 




PIE 10930 


X'03A2' 


RC>0 TPDVTS 


PIE 10960 


X'03C0' 


RC>0 relstore 


ISTPICIN 




PIEO0330 


X'814A' 


RC>8 reqstore 


PIEO6340 


X'8154' 


RC>8 reqstore 


PIEO0350 


X'815E' 


Invalid LCCW 


PIEO0360 


X'8168' 


RC>8 relstore 


ISTPICIT 




PIEO0430 


X'81AE' 


RC>8 reqstore 


PIEO0440 


X'81B8' 


RC>0 from TPDVTS 


PIEO0450 


X'81C2' 


RC>8 from reqstore 


ISTPICLA 




PIEI1720 


X , 06B8' 


RO0 relstore 


PIE 11730 


X'06C2' 


RC>0 relstore 


PIE 11740 


X'0600' 


RC>8 reqstore 


PIEI1750 


X'06D6' 


Unexpected LCPB 



PIB (ISTPIB) (continued) 



(continued) 
Value Meaning 



ISTPICLC 
PIEO1220 X-84C4' 

PIEO1230 X'84CE' 

ISTPICLT 
PIEO0610 X'8262' 

PIEO0620 X'826C 



Loop in test channel program 
RC>8 reqstore 



RC>8 reqstore 
ROO TPDVTS 



ISTPICNR 
PIEI1120 X'0460' 



PIEI1125 
PIEI1130 
PIEI1135 
PIEI1140 
PIEI1150 
PIEI1160 
PIEI1170 
PIEI1180 
PIEO0332 
PIEO0334 



X'0465' 
X'046A' 
X'046F' 
X'0474' 
X'047E' 
X'0488' 
X'0492' 
X'049C 
X'814C 
X'814E' 



RC>8 from reqstore 
RC>OCIDCTLf?nd 
RC=0or 12CIDaLfind 
RC>0 CIDCTL finish 
RC>0 from relstore 
RC>0 from relstore 
RC>8 from reqstore 
RC>0 from relstore 
ROO from CIDCTL finish 
RC>0 CIDCTL find 
RC>0CIDaL finish 



ISTPICQP 
PIEI1220 X'04C4« 



PIEI1230 
PIEI1240 
PIEI1250 
PIEI1260 
PIEI1270 
PIE 1 1280 
PIEI1290 
PIE 1 1295 



X'04CE' 
X'04D8' 
X'04E2' 
X'04EA' 
X'04F4' 
X'04FE' 
X'0508' 
X'050D' 



RC>8 from reqstore 

ROO from relstore 

ROO from relstore 

RC>0 from relstore 

RC>0 from relstore 

RC>0 from CIDCTL for obtaining a lock 

ROO from CIDCTL for releasing a lock 

ROO from CIDCTL for releasing a lock 

ROO from CIDCTL for releasing a lock 



ISTPICRP 




PIE 11320 


X'0528' 


RC>8 reqstore 


ISTPICSC 




PIEO0510 


X'81FE' 


RC > 8 from reqstore 


PIEO0520 


X'8208' 


RC>8 from relstore 


PIEO0530 


X'8212' 


RC>8 from reqstore 


PfEO0540 


X'821C 


ROO from relstore 


PIEO0550 


X'8226' 


RC > 8 from reqstore 


PIEO0560 


X'8230' 


ROO from relstore 


PIEO0570 


X'823A' 


ROO from relstore 


PIEO0580 


X'8244' 


ROO from relstore 


PIEO0590 


X'824E' 


RC>8 from reqstore 



P1B (ISTPIB) (continued) 



Label 



(continued) 
Value Meaning 



ISTPICSO 
PIEO1310 X*851E' 

PIEO1320 X'8528' 

PIEO1330 X'8532' 



RC>8 from reqstore 
RC>OCIDCTLfind 
RC>OCIDCTL finish 



ISTPICSS 






PIEO0710 


X'82C6' 


RC->8 from reqstore 




PIEO0720 


X'82D0' 


RC>8 from reastore 




PIEO0730 


X'820A' 


RC>8 from reastore 




PIEO0740 


X'82E4' 


RC>8 from reqstore 




PIEO0750 


X'82EE' 


RC>0 from CIDCTL for obtaining a 


lock 


PIEO0760 


X'82F8' ■ 


RC>0 from CIDCTL for releasing a 


lock 


ISTPICST 






PIEI3610 


X'OEIA* 


LRA error 




PIEI3635 


X'0E33' 


Unidentifiable completion status 




ISTPICSU 






PIEI1410 


X'0582' 


RC>0 from relstore 




PIEI1420 


X'058C 


RC>0 from relstore 




PIEI1430 


X'0596' 


RC>8 from reastore 




PIEI1440 


X'05A0' 


RC>8 from reqstore 




PIEI1450 


X'05AA' 


RCXHromTPDVTS 




PIEI1460 


X'05B4' 


RC>0 from CIDCTL find 




PIEI1470 


X'05BE' 


RC>0 from CIDCTL finish 




PIEI1480 


x-oscs 1 


RC>0 from relstore 




ISTPICTA 






PIE 11620 


X'0654' 


ROO relstore 




PIEI1630 


X'065A' 


RC>8 reqstore 




ISTPICTC 






PIEO1030 


X'8406' 


RC>0 from CIDCTL find 




PIEO1040 


X'8410' 


RC >8 from reqstore 




PIEO1050 


X'841A' 


RC>0 from CIDCTL finish 




PIEO1060 


X'8424' 


RC>0 from CIDCTL finish 




PIEO1070 


X'842E' 


RC>8 reqstore 




ISTPOF 






None 








ISTPICTH 






PIEI1810 


X'0712' 


RC>8 from reqstore 




PIEI1820 


X'071C 


RC>0 from relstore 




PIEI1830 


X'0726' 


RC > from relstore 




PIEI1840 


X'0730' 


RC>8 from reqstore 




PIEI1850 


X'073A' 


RC>8 from reqstore 




PIEI1860 


X'0744' 


RC>0 from TPDVTS 





PIB (ISTPI B) (continued) 



(continued) 



ISTPIOTO 
PIEO0820 X'8334' 

PIEO0830 X'833E' 



RC>8 reqstore 
RC>0 relstore 



ISTPiaR 
PIEO0930 X'83A2' 

PIEO0940 X'83AC 

PIEO0950 X'8336' 



invalid LCCW 
RC>8 reqstore 
ROO relstore 



ISTPICXP 
PIE 13660 X'0E4C 

PIE 13670 X'0E56' 

$$ABERV1 

None 



LRA error 
Invalid CB input 



$$ABERV2 
PIE 13760 X'OEBO' 



Valid CB not found 



$$ABERV3 
PIEI3810 X'0EE2' 

PIEI3820 X'OEEC 



LRA error 

CCB not found i 



$$ABERV4 
PIEI3880 X'0F28' 

PIE 13860 X'0F14' 

PIE 13870 X'OFIE' 



Failing CCW not found 
CCB not found in LONCB 
CC and O APPR LRA 



$$ABERV5 
PIEI3910 X'0F46' 



$$ABERV6 
PIE 13960 X'0F78' 



$$RAST14 

None 

$$RAST15 

None 

SMS 

None 



PIB (1STP1B) (continued) 



Constants 


(continued) 


Label 


Value 


Meaning 


PIEI0192 


X'0000' 


RC>OTPDVTS 


PIE 10534 


X'0216' 


RC^OTPDVTS 


PIE 10623 


X'0271' 


ROOCIDaL finish 


PIE 10627 


X'0273' 


RO=0112CIDaL,find 


PIEO0202 


X'80CA' 


RC>0 TPDVTS within linkx 


PIEO0204 


X'80CC 


ROOTPDVTS 


PIE 10904 


X'0388' 


RC>0 TPDVTS within linkz 


PIEI1010 


X'03F2' 


ISTPICMA-relstore failed for MTA association FSB 


PIEI1144 


X'0478' 


ROOfrom CIDCTLfind 


PIEI1145 


X'0479' 


RC>0 from CIDaL finish 


PIEI1146 


X'047A' 


RC>0 from CIDaL find 


PIEI1147 


X'0478' 


ROO from CIDaL finish 


PIEO0555 


X'8228' 


RC>0 from CIDaL find 


PIEO0557 


X'822D' 


ROO from CIDaL finish 


PIEI3615 


X'OEIF' 


CCW at head of buffer not read/write/WRBP 


PIEI3620 


X'0E24' 


NOP preceded by write, not write BP 


PIEI3625 


X'0E29' 


Insufficient read CCWS or data-chained read 


PIE 13630 


X'0E2E' 


Unchained write CCW 


ISTPICXO 




PIEO0224 


X'80E0' 


RC>0 CIDaL find 


ISTPIEIR 




PIEO4000 


X'8FA0' 


TPDVTS failure 


ISTPLIEPB 




PIEO4005 


X'8FA5' 


Reqstore RC>8 


PIEO4006 


X'8FA6' 


CIDaL find error 


PEIO4007 


X'8FA7' 


CIDaL finish error 


ISTPIEPA 




PIE 140 10 


X'OFAA' 


TPDVTS failure 


ISTPIEIS 




PIEO4015 


X'8FAF' 


Reqstore RC> 8 


ISTPIESA 




PIEI4017 


X'OFBT 


Reqstore return CDE>8 


ISTPIEIF 




ISTPIETT 




PIEO4020 


X'8FB4' 


CIDaL find Re=o 


PIEO4025 


X'8FB9' 


CIDaL relese DAF look RC-=0 


ISTPLIECP 




PIE 14020 


X'OFBO' 


CIDaL find error 


PIE 14025 


X'CFB5' 


CIDaL finish error 


ISTPIELO 




PIEO4030 


X'8FBE' 


Reqstore RC>8 



PIB (ISTP1B) (continued) 



Constants (continued) 

Label Value Meaning 



ISTPIELF 
PIE 14035 X'0FC3' 



ISTPIELS 
PIEO4040 X'8FC8' 



ISTPIERO 
PIEO4045 X'8FCD' 



ISTPIERF 
PIEI4050 X'8F02' 



ISTPIESI 
PIEO4055 X'8F07' 



Reqstore RC>8 

Reqstore>8 

Reqstore>8 

Reqstore>8 

Reqstore>8 
1 1 = common 



RDT 


(ISTRDT 












Dec 


Hex 


48 
4C 
50 
54 
58 

5C 
60 
64 
68 





1 


2 


3 







RDTPRE - 
Entry prefix 


72 


RDTPLEN 
Priority and length field 


76 


RDTFORW 
Foreword pointer 


80 


RDTBACK 
Backward pointer 


84 


RDTFLAGS 
Segment flags, unused/refused 


RDTCTSNT 
Count of SNT entries for segment 


88 


RDTMAXID 
Max node ID 
for network 


RDTNODID 
Node ID for 
this segment 


RDTLGCT 
Count of logons 
outstanding 


RDTFLAGB 
Flag byte 


92 


RDTVPA3 
Address of vary PAB 


96 


RDTEPAB 
Address of ERP PAB 


100 


RDT D PAB 
Address of dump/load/restart PAB 


104 


RDTTPAB 
Toltep SSCP PAB 




OR 


G RDTPLEN 






72 


48 


RDTPRIOR 
Determines 
Segment type 






OR 


G RDTPLEN + 






73 


49 




RDTLEN 
Length of RDT 



F lags and masks 

Disp. Fbg Contains 

91 (5B) RDTFLAGB Flag byte 



RDTOUERP X'80' 1= repeat ERP 

RDTPRGDN X'40' 1 = purge issued 



RDT (ISTRDT ) (continued) 
Flags and masks 



Disp. Flag 


Contains 


Mask 


Value 


Means 


91(5B) (continued) 




RDTCTPGD 


X'20' 


1 = contact purged 






RDTCTCFL 


X'10' 


Higher failure-contact 
flushed 






RDTRSV01 


X'OF' 


Reserved 


72(48) RDTPRIOR 


Determines 


@NM000Q5 


X'F8' 


Not used 



RDTPRIAP X'04' Application segment 

RDTPRILC X'02' Local segment 

RDTPRIRN X'OT RN segment 



RH (ISTRH ) 



Hex 







1 


2 


3 


RHFLAGS 
Request header flags 





ORG RHFLAGS 



RH1 

1st RH byte 



ORG RHFLAGS + 1 



ORG RHFLAGS + 2 



RH2 

2nd RH byte 



RH3 
3rd RH byte 



Flags and masks 
Disp. Flag 
0(0) RH1 



1(1) RH2 



Second RH byte 



2(2) RH3 



RHQS 


X'80' 


- request, 1 - response 


RHTYPE 


X'40' 


- data, 1 - control 


RHSCI 


X'20' 


- FM, 1 - system control 


RHDIRI 


X'10' 


- with, 1 - against 


RHFORMAT 


X'08' 


- unformatted, 

1 - formatte 


RHSENSE 


X'04' 


- not included, 

1 - included 


RHCHAIN 


X'03' 


Chaining control 
-middle 


RHFME 


X'80' 


Q -FME requested, 
S -FME 


RHPE 


X'40' 


Q - PE requested, S -PE 


RHRRN 


X'20' 


Q - RRN requested, 
S-RRN 


RHEXCEPT 


X'10' 


Q - exception responses 
only S - error 


RHRETRY 


X'08 1 


Q - retry 


RHBUSY 


X'08' 


S - busy 


RHRSVD1 


X'04' 


Q - reserved 


RHINOP 


X'04' 


S - inoperative 


RHRSVD2 


X'02' 


Q - reserved, S - reserve 


RHPACE 


X'01' 


Q - pacing request, 
S - pace 


RHBB 


X'80' 


Begin sequence 


RHFB 


X'40" 


End sequence 


RHCDIR 


X'20' 


Change direction 


RHRCDIR 


X'10' 


Request change direction 


RHRSVD3 


X'08' 


Reserved 


RHLOG 


X'04' 


Log 


RHRSVD4 


X'02' 


Reserved 


RHRSVD5 


x'or 


Reserved 



RH (ISTRH ) (continued) 
Constants in ISTRH 



Meaning 



RHFIRST 


B'10' 


First in chain 


RHMIDLE 


B'OO' 


Middle of chain 


RHLAST 


B'OT 


Last in chain 


RHONLY 


B'lT 


Only one in chain 


RHRESP 


X'938000' 


RH response mask 


RHREQ 


X'OaOOOO' 


RH request mask 



RPH 


(ISTRPH) 

Hex 


4 

8 
C 

10 

14 

18 
1C 










Dec 













RPHTYPE 
Control Block 
Type 


RPHLNGTH 
Length in 
Bytes 


RPHFLAGS 
System 
Dependent 
Flags 


RPHFLGB 
Second Flag 
Byte 


4 


RPHRPHA 
Address of next RPL Header 


8 


RPHRPHAP 


ORG OVERLAP 


12 


RPHDVTA 
Address of Current DVT 


16 


RPHRESMA 
TPWAIT-Post Information 


20 


RPHPABOF 
Offset of PAB 
in Control BLK 


RPHMAJCB 
Address of Major Control Block 


24 


RPHWEA 
Address of Work Element 


28 


RPHSRPRM 
Service Routine Parm. Field 



RPHCRR 
Address of Component Recovery Record 
(VSl+VS2 0nly) 



RPHPABQA 
PAB Queue Address 



RPHWORK 
16 Word Work Area 



RPH (ISTRPH) ( Continued) 



Dec Hex 
104 68 



Org RPHRESMA 



RPHWPFLG 

Wait-Post 

Flags 















RPHNEXPO 
Address Next RPH to be Posted 


Orq 


ISTRPH+8 




RPHTSKID 
Task Identification or Address of APS Table 


Orq 


RPHTSKID 




UNNAMED 
RPH TSK ID 


RPHTIK 
TIK 



Org RPHRESMA+1 



RPHRESUM 
Resume Address 



Org RPHWEA 



RPHCSPA 
Address of ISTCSP 



Org RPHPABQA 



RPHPABFG 


RPHPABQP 


Flag Byte 


Pointer to Queue of PAB's 


carried from 




PAB 





Org RPHWORK 



Org RPHSAVE1 



RPHSBYTE 
-Byte Save 



RPHSBITS 
Save Field 
for Flag Byte 



OrgRPHSAVEl+2 



Org 



RPHSHAlf 
Half Word Save Area 



RPH (ISTRPH) ( Continued) 

Dec Hex 
48 30 



72 48 

76 4C 

80 50 

84 54 



RPH (ISTRPH) ( Continued) 



Displacement List of Fields i 


n ISTRPH 


1 










Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


0000 


0000 


RPHTYPE 


0024 


0018 


RPHCSPA 


0056 


0038 


RPHSAVE5 


0001 


0001 


RPHLNGTH 


0024 


0018 


RPHWEA 


0060 


003C 


RPHSAVE6 


0002 


0002 


RPHFLAGS 


0028 


001C 


RPHSRPRM 


0064 


0040 


RPHSAVE7 


0003 


0003 


RPHFLGB 


0032 


0020 


RP.HCRR 


0068 


0044 


RPHSAVE8 


0004 


0004 


RPHRPHA 


0036 


0024 


RPHPABFG 


0072 


0048 


RPHSAVE9 


0008 


0008 


0NMOOO24 


0036 


0024 


RPHPABQA 


0076 


004C 


RPHSAV10 


0008 


0008 


RPHTSKID 


0037 


C025 


RPHPABQP 


0080 


0050 


RPHSAV1 1 


0008 


0008 


RPHRPHAP 


0040 


0028 


RPHSBYTE 


0084 


0054 


RPHSAV12 


0011 


000B 


RPHTIK 


0040 


0028 


RPHSAVE1 


0088 


0058 


RPHSAV13 


0012 


oooc 


RPHDVTA 


0040 


0028 


RPHWORK 


0092 


005C 


RPHSAV14 


0016 


0010 


RPHWPFLG 


0041 


0029 


RPHSBITS 


0096 


0C60 


RPHSAV15 


0016 


0010 


RPHRESMA 


0042 


002A 


RPHSHALF 


0100 


0064 


RPHSAV16 


0017 


0011 


RPHRESUM 


0044 


002C 


RPHSAVE2 


0104 


0068 


RPHNEXPO 


0020 


0014 


RPHPABOF 


0048 


0030 


RPHSAVE3 








0021 


0015 


RPHMAJCB 


0052 


0034 


RPHSAVE4 









Alphabetical List of Fields in ISTRPH 



Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


<S>NM00024 


0008 


0008 


RPHRPHA 


0004 


0004 


RPHSAV14 


0092 


005C 


RPHCRR 


0032 


0020 


RPHRPHAP 


0008 


0008 


RPHSAV15 


0096 


0060 


RPHCSPA 


0024 


0018 


RPHSAVE1 


0040 


0028 


RPHSAV16 


0100 


0064 


RPHDVTA 


0012 


OOOC 


RPHSAVE2 


0044 


002C 


RPHSBITS 


0041 


0029 


RPHFLAGS 


0002 


0002 


RPHSAVE3 


0048 


0030 


RPHSBYTE 


0040 


0028 


RPHFLG3 


0003 


0003 


RPHSAVE4 


0052 


0034 


RPHSHALF 


0042 


002A 


RPHLNGTH 


0001 


0001 


RPHSAVE5 


0056 


0038 


RPHSRPRM 


0028 


001C 


RPHMAJCB 


0021 


0015 


RPHSAVE6 


0060 


003C 


RPHTIK 


0011 


000B 


RPHNEXPO 


0104 


0068 


RPHSAVE7 


0064 


0040 


RPHTSKID 


0008 


0008 


RPHPABFG 


0036 


0024 


RPHSAVE8 


0068 


0044 


RPHTYPE 


0000 


0000 


RPHPABOF 


0020 


0014 


RPHSAVE9 


0072 


0048 


RPHWEA 


0024 


0018 


RPHPABQA 


0036 


0024 


RPHSAV10 


0076 


004C 


RPHWORK 


0040 


0028 


RPHPABQP 


0037 


0025 


RPHSAV1 1 


0080 


0050 


RPHWPFLG 


0016 


0010 


RPHRESMA 


0016 


0010 


RPHSAV12 


0084 


0054 








RPHRESUM 


. 0017 


0011 


RPHSAV13 


0088 


0058 









RPH (ISTRPH) ( Continued) 



Flags and Masks 








Flag 


Contains 


Mask 


Value 


Means 


RPHCSPA 


Address of ISTCSP 


RPHWEGT 


X'80' 


Gate for Work Element 
Proc. 


RPHFLAGS 


System Dependent 


RPHOGIND 


X'80' 


Open Gate Indicator 




Flags 


RPHSPGIN 


X'40' 


Special Gate Open 
Indicator 






RPHAPTYP 


X'20' 


APS is a User Exit 






RPHSMQ 


X'10' 


Indicator if RPH is 
to be Queued 






RPHSMTYP 


X'08' 


Request Type is Buffer 
or Double-Word 






RPHSMCLR 


X'04' 


Indicator if Buffer to 
be cleared 






RPHMLTCP 


X'02' 


Used by Local 3270 
Support when 
Building Multiple 






RPHFSTLC 


x'or 


Used by Local 3270 
Support to Indicate 
First LCCW 






RPHFNFLG 


x-or 


LCCW set Function 
Flags 


RPHFLGB 


Second Flag 


RPHLOCK 


X'80' 


Locking Option 




Byte 


RPHBSSP 


X'40' 


System Services Progress 






RPHFBAPS 


X'20' 


STG Obtained by APS 






RPHNRSAV 


X'lF' 


Do not save on Activate 


RPHRPHA 


Address of next 


RPHGATE 


X'80' 


Gating Flag 




RPL Header 


@NM00023 


X'7F' 


Reserved 


RPHSBITS 


Save Field for 


RPHSBIT1 


X'80' 


1st Save Field 




Flag Byte 


RPHSBIT2 


X'40 1 


2nd Save Field 






RPHSBIT3 


X'20' 


3rd Save Field 






RPHSBIT4 


X'10" 


4th Save Field 






RPHSBIT5 


X'08' 


5th Save Field 






RPHSBIT6 


X'04' 


6th Save Field 






RPHSBIT7 


X'02' 


7th Save Field 






RPHSBIT8 


x'or 


8th Save Field 


RPHWPFLG 


Wait-Pest Flags 


RPHRSKEY 


X'FO' 


Storage Protect key to 
Resume Processing 






RPHWT 


X'08' 


Wait Bit 






RPHPT 


X'04' 


Post Bit 






RPHRSV01 


X*03' 


Reserved 



RPH (ISTRPH) (Continued) 



Constants in ISTRPH 



Meaning 



RPTYPE 


X'01' 


Type Code for RPH 


RPHWTO 


X'F7FFFFFF' 


Turn RPHWT Off 


RPHWT1 


X'08000000' 


Turn RPHWT On 


RPHPT.O 


X'FBFFFFFF 1 


Turn RPHPT Off 


RPHPT1 


X'04000000' 


Turn RPHPT On 


RPHPABQ1 


X'80000000' 


Turn RPHPBQ Gate 



RPL (ISTRPL) 



Dec Hex 




UNNAMED 
RPLID 



UNNAMED 
Reserved 



UNNAMED 
RPLOPT1 



UNNAMED 
Reserved 



RPLACTIV 
Subtype 
X'FF'=active 
X'00'= inactive 



UNNAMED 
Reserved 



RPLPLHPT 
RPLH Pointer 



UNNAMED 
CID or NIB Pointer RPLARG 



UNNAMED 
Pointer to Area RPLAREA 



UNNAMED 
Record Length RPLRLEN 



UNNAMED 
Area Length RPLBUFL 



UNNAMED 
Pointer to ACB RPLDACB 



UNNAMED 
Request Code 
RPLREQ 



UNNAMED 
Reserved 



UNNAMED 
Reserved 



RPLLEN2 
RPL Length 



UNNAMED 
Reserved 



RPLEXTDS 
Exit Definition 



UNNAMED 
Reserved 



UNNAMED 
Feedback RC RPLFDBK 



RPLAAREA 
Alternate Area Pointer 



RPLECB 
ECB or Pointer to ECB/EXIT 



RPLAARLN 
Alternate Area Length 



RPL (ISTRPL) ( Continued) 



Dec Hex 
52 34 











RPLARCLN 
Alternate Record Size 


RPLFDBK2 
Feedback Word 


RPLUSFLD 
User Field 


RPLOPTC3 
Additional Option Codes 


RPLOPTC3 
Move VTAM Options 


RPLHCN 
Third RH 
Byte 


RPLSRTYP 
Send or 
Receive Type 


RPLVTFL1 

VTAM 

Flags 


RPLVTFL2 

VTAM 

Flags 


RPLCHN 
Position in 
HU Chain 


RPLCNTRL 

PU Control Code 


RPLOBSC 
STSN Outbnd. S 


3V 

eq. Nr. 


RPLIBSQV 
STSN Inbind. Seq. Nr. 


RPLOBSQ 
STSN Outb. 
Action Code 


RPLIBSQ 
STSN Inbound 
Action Code 


RPLSEQNO 
Sequence Number 


RPLOSENS 
Sense Output Data 


RPLSTYP 
Subtype 


RPLRSV1 



Org 



@NM00007 



RPL (ISTRPL) ( Continued) 



X 










Org 


RPLEXTDS 








RPLEXTD1 




Org (S)NM00024 










UNNAMED 
RPLRTNCD 


UNNAMED 
RPLFDB2 




Org @NM00024+2 








UNNAMED 
RPLFDB3 


Org 


RPLECB 






UNNAMED 
Reserved 


RPLPOST 
Event Complete 




Org 


RPLFDBK2 






RPLSIGDA 
Signal Data Field 


Org 


RPLSIGDA 






RPLSSNSI 
System Sense Inp. 




Orq 


RPLSSNSI 






RPLDSB 
Device Status 




Org 


RPLDSB 








RPLDSB 1 
Dev. Status 
Byte 1 




Orq 


RPLDSB 1 






RPLSSEI 
Sys SNS 
Error Codes 




Org 


RPLDSB+1 








RPLDSB2 
Dev. Status 
Byte 2 





RPL (ISTRPL) ( Continued) 















Dec 


Hex 












Org 


RPLDSB2 








57 


39 

Org RPLSIGDA+2 
3A 

Org RPLUSNSI 
3A 


RPLSSMI 
SYS SNS 
Mod in 










58 


RPLUSNSI 
User Sense Input 








58 


RPLESRl 
Extd.Syst. 
Resp. 1 


RPLESR2 
Extd.Syst. 
Resp. 2 




Org 


RPLOPTC2 






64 


40 


RPLOPT5 
Fifth Byte 
of Options 






Org 


RPLOPTC2+1 




65 


41 

Org RPLOPTC2+2 
42 

Org RPLOPTC2+3 
43 


RPLOPT6 
Sixth Byte 
of Options 










66 


RPLOPT7 
Seventh Byte, 
of Options 










67 


RPLOPT8 
Eighth Byte 
of Options 



Org RPLOPTC3 



RPLOPT9 

Ninth Byte 

of Options 



Org RPLOPTC3+1 



RPLOPT10 
Tenth Byte 
of Options 



RPL (ISTRPL) ( Continued) 



Org RPLOPTC3+2 



RPLOPTI1 
Eleventh Byte 
of Options 



Org RPLOPTOf3 



RPLOPT12 
Twelvth Byte 
of Options 



Org RPLCNTRL 



RPLCNTDF 
Data Flow 
Control Codes 



Org RPLCNTRL+1 



RPLCNTDC 
Data Flow 
Control CTD 



Org RPLCNTRL+2 



RPLCNTSC 
Session Control 
Codes 



Org RPLOSENS 



RPLSSNSO 
System Sense Output 



Org RPLSSNSO 



RPLSSEO 
System Sense 
Error Code 



Org RPLSSNSO+1 



RPLSSMO 
System Sense 
Mod Output 



Org RPLOSENS+2 



RPLUSNSO 
User Sense Output 



RPL (ISTRPL) ( Continued) 



Displacement List of Fields in ISTRPL 












Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


0000 


0000 


@NM00005 


0039 


0027 


(3NM00027 


0068 


0044 


RPLOPTC3 


0001 


0001 


RPLACTIV 


0040 


0028 


RPLAAREA 


0069 


0045 


RPLOPT10 


0002 


0002 


<9>NM00006 


0044 


002C 


@NM00028 


0070 


0046 


RPLOPT11 


0003 


0003 


RPLLEN2 


0044 


002C 


RPLECB 


0071 


0047 


RPLOPT12 


0004 


0004 


RPLPLHPT 


0046 


002E 


RPLPOST 


0072 


0048 


RPLRH3 


0008 


0008 


RPLSAF 


0048 


0030 


RPLAARLN 


0073 


0049 


RPLSRTYP 


0008 


0008 


0NMOOOO7 


0052 


0034 


RPLARCLN 


0074 


004A 


RPLVTFL1 


0010 


000A 


RPLDAF 


0056 


0038 


RPLSSEI 


0075 


004B 


RPLVTFL2 


0012 


OOOC 


<§>NM00008 


0056 


0038 


RPLDSB1 


0076 


004C 


RPLCHN 


0016 


0010 


(PNM00009 


0056 


0038 


RPLDSB 


0077 


004D 


RPLCNTDF 


0020 


0014 


@NM00010 


0056 


0038 


RPLSSNSI 


0077 


004D 


RPLCNTRL 


0024 


0018 


(3NM00011 


0056 


0038 


RPLSIGDA 


0078 


004E 


RPLCNTDC 


0028 


001C 


@NM00012 


0056 


0038 


RPLFDBK2 


0079 


004F 


RPLCNTSC 


0029 


001D 


(5NM00013 


0057 


0039 


RPLSSMI 


0080 


0050 


RPLOBSQV 


0030 


001E 


0NMOOO14 


0057 


0039 


RPLDSB2 


0082 


0052 


RPLIBSQV 


0031 


00 IF 


©NM00015 


0058 


003A 


RPLESR1 


0084 


0054 


RPLOBSQ 


0032 


0020 


@NM00016 


0058 


003A 


RPLUSNSI 


0085 


0055 


RPLIBSQ 


0033 


0021 


@NM00020 


0059 


003B 


RPLESR2 


0086 


0056 


RPLSEQNO 


0034 


0022 


RPLEXTD1 


0060 


003C 


RPLUSFLD 


0088 


0058 


RPLSSEO 


0034 


0022 


RPLEXTDS 


0064 


0040 


RPLOPT5 


0088 


0058 


RPLSSNSO 


0035 


0023 


@NM00022 


0064 


0040 


RPLOPTC2 


0088 


0058 


RPLOSENS 


0036 


0024 


0NMOOO23 


0065 


0041 


RPLOPT6 


0089 


0059 


RPLSSMO 


0037 


0025 


@NM00025 


0066 


0042 


RPLOPT7 


0090 


005A 


RPLUSNSO 


0037 


0025 


<S>NM00024 


0067 


0043 


RPLOPT8 


0092 


005C 


RPLSTYP 


0038 


0026 


0NMOOO26 


0068 


0044 


RPLOPT9 


0093 


005D 


RPLRSV1 



RPL (ISTRPL) ( Continued) 



Alphabetical List of Fields in ISTRPL 



Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


@NM00005 


0000 


0000 


RPLCNTDC 


0078 


004E 


RPLOPT6 


0065 


0041 


(3NM00006 


0002 


0002 


RPLCNTDF 


0077 


004D 


RPLOPT7 


0066 


0042 


#NM00007 


0008 


0008 


RPLCNTRL 


0077 


004D 


RPLOPT8 


0067 


0043 


(SNM00008 


0012 


OOOC 


RPLCNTSC 


0079 


004F 


RPLOPT9 


0068 


0044 


©NM00009 


0016 


0010 


RPLDAF 


0010 


000A 


RPLOSENS 


0088 


0058 


(3NM00010 


0020 


0014 


RPLDSB 


0056 


0038 


RPLPLHPT 


0004 


0004 


@NM00011 


0024 


0018 


RPLDSB1 


0056 


0038 


RPLPOST 


0046 


002E 


@NM00012 


0028 


001C 


RPLDSB2 


0057 


0039 


RPLRH3 


0072 


0048 


@NM00013 


0029 


001D 


RPLECB 


0044 


002C 


RPLRSV1 


0093 


005D 


@NM00014 


0030 


00 IE 


RPLESR1 


0058 


003A 


RPLSAF 


0008 


0008 


@NM00015 


0031 


001F 


RPLESR2 


0059 


003B 


RPLSEQNO 


0086 


0056 


@NM00016 


0032 


0020 


RPLEXTDS 


0034 


0022 


RPLSIGDA 


0056 


0038 


(3NM00020 


0033 


0021 


RPLEXTD1 


0034 


0022 


RPLSRTYP 


0073 


C049 


(SNM00022 


0035 


0023 


RPLFDBK2 


0056 


0038 


RPLSSEI 


0056 


0038 


@NM00023 


0036 


0024 


RPLIBSQ 


0085 


0055 


RPLSSEO 


0088 


0058 


(3NM00024 


0037 


0025 


RPLIBSQV 


0082 


0052 


RPLSSMI 


0057 


0039 


0NMOOO25 


0037 


0025 


RPLLEN2 


0003 


0003 


RPLSSMO 


0089 


0059 


0NMOOO26 


0038 


0026 


RPLOBSQ 


0084 


0054 


RPLSSNSI 


0056 


0038 


@NM00027 


0039 


0027 


RPLOBSQV 


0080 


0050 


RPLSSNSO 


0088 


0058 


(SNM00028 


0044 


002C 


RPLOPTC2 


0064 


0040 


RPLSTYP 


0092 


005C 


RPLAAREA 


0040 


0028 


RPLOPTC3 


0068 


0044 


RPLUSFLD 


0060 


003C 


RPLAARLN 


0048 


0030 


RPLOPT10 


0069 


0045 


RPLUSNSI 


0058 


003A 


RPLACTIV 


0001 


0001 


RPLOPT11 


0070 


0046 


RPLUSNSO 


0090 


005A 


RPLARCLN 


0052 


0034 


RPLOPT12 


0071 


0047 


RPLVTFL1 


0074 


004A 


RPLCHN 


0076 


004C 


RPLOPT5 


0064 


0040 


RPLVTFL2 


0075 


004B 



RPL (1STRPL) ( Continued) 



Flags and Masks 








Flag 


Contains 


Mask 


Value 


Means 


0NMOOO16 


RPLOPT1 


@NM00017 


X'FO' 


Reserved 






@NM00018 


X'08' 


Rplasy 






(3NM00019 


X'06' 


Reserved 






RPLECBIN 


X'OT 


l=External ECB 


@NM00026 


RPLFDB2 


RPLERLK 


X'80' 


Error Lock Set 






RPLRVID 


X'40' 


RVI Received 






RPLATND 


X'20' 


Attention Received 






RPLDVUNS 


X'10' 


Device Unuseable 






RPLIOERR 


X'08' 


I/O Error Type 
(0=|nput) 






RPLDLGFL 


X'04' 


Dialog Initiation 
failed 






RPLCUERR 


X'02' 


Control Unit failure 






RPLSTSAV 


X'OT 


Sense Bytes Present 


<S)NM00027 


RPLFDB3 


RPLUINPT 


X'80' 


Unsolicited Input 






RPLRSV32 


X'40' 


Reserved 






RPLREOB 


X'20' 


End of Block 






RPLREOM 


X'10' 


End of Message 






RPLREOT 


X'08' 


End of Transmission 






RPLLGFRC 


X'04' 


LOGOFF Received 






RPLRLG 


X'02' 


Leading Graphics 
received 






RPLRDSOH 


X'01' 


SOH received 


RPLCHN 


Position in HU 


RPLFIRST 


X'80' 


Chain First 




Chain 


RPLMIDLE 


X'40' 


Chain Middle 






RPLLAST 


X'20' 


Chain Last 






RPLONLY 


X'10' 


Chain Only 






(9NM00037 


X'OF' 


Reserved for VTAM 


RPLCNTDC 


Data Flow Control 


RPLBID 


X'80' 


Control BID 




CTD 


RPLRTR 


X'40' 


Control RTR 






RPLLUS 


X'20' 


Control LUS 






RPLSIGNL 


X'10' 


Control SIGNAL 






(SNM00039 


X'OF' 


Reserved for VTAM 


RPLCNTDF 


Data Flow Control 


RPLDATA 


X'80' 


Control DATA 




Codes 


RPLCNCEL 


X'40' 


Control CANCEL 






RPtQC 


X'20' 


Control QC 






RPLQEC 


X'10' 


Control QEC 






RPLCHASE 


X'08' 


Control CHASE 






RPLRELQ 


X'04' 


Control RELQ 






RPLQI 


X'02' 


Reserved for VTAM 






$NM00038 


x-or 


Reserved for VTAM 


RPLCNTSC 


Session Control 


RPLSDT 


X'80' 


Control SDT 




Codes 


RPLCLEAR 


X'40' 


Control CLEAR 






RPLSTSN 


X'20' 


Control STSN 






RPLSHUTD 


X'10' 


Control SHUTD 






RPLSHUTC 


X'08' 


Control SHUTC 






RPLRQR 


X'04' 


Control RQR 






RPLRSHUT 


X'02' 


Control RSHUTD 






@NM00040 


x-or 


Reserved for VTAM 



RPL (ISTRPL) ( Continued) 



Flags and Masks ( Continued) 








Flag 


Contains 


Mask 


Value 


Means 


RPLEXTD1 




RPLEXSCH 


X'80' 


Exit Scheduled 
Indicator 






RPLNEXIT 


X'40' 


No Exit specified 






RPLEXIT 


X'20' 


Exit 






RPLLVNT 


X'10' 


Exit - Local SRB 






RPLGVNT 


X'08' 


Exit - Global SRB 






RPLNIB 


X'04' 


1= ARGhas NIB 
Pointer 






RPLBRANC 


X'02' 


1= Branch Entry to 
Macro 






@NM00021 


X'OT 


Reserved 


RPLIBSQ 


STSN Inbound 


RPLISET 


X'80' 


IBSQAC Set 




Act. Code 


RPLITST 


X'40' 


IBSQAC Testset 






RPLIRSET 


X'20' 


IBSQAC Reset 






RPLIIGN 


X'10' 


IBSQAC Ignore 






RPLIPOS 


X'08 1 


IBSQAC Testpos 






RPLINEG 


X'04' 


IBSQAC Testneg 






RPLIINV 


X'02' 


IBSQAC Invalid 






@NM00042 


x'or 


Reserved for VTAM 


RPLOBSQ 


STSN Outbound 


RPLOSET 


X'80' 


OBSQAC Set 




Act. Code 


RPLOTST 


X'40' 


OBSQAC Testset 






RPLOR3ET 


X'20' 


OBSQAC Reset 






RPLOIGN 


X'10' 


OBSQAC Ignore 






RPLOPOS 


X'08' 


OBSQAC Testpos 






RPLONEG 


X'04' 


OBSQAC Testneg 






RPLOINV 


X'02' 


OBSQAC Invalid 






@NM00041 


X'OT 


Reserved for VTAM 


RPLOPT10 


Tenth Byte of 


RPLBSCID 


X'80' 


INQBSC ID 




Options 


RPLDSPLY 


X'40' 


INQ Display 






RPLRSVn 


X'20' 


Reserved 






RPLRSV12 


X'10' 


Reserved 






RPLRSV13 


X'08' 


Reserved 






RPLRSV14 


X'04' 


Reserved 






RPLRSV15 


X'02' 


Reserved 






RPLRSV16 


X'OT 


Reserved 


RPLOPT11 


Eleventh Byte of 
Options 


RPLQUIES 


X'80' 


SETLOGON Quiesce 
(Default) 






RPLSTART 


X'40' 


SETLOGON Start 






RPLSTOP 


X'20 1 


SETLOGON Stop 






RPLRSVE4 


XMO' 


Reserved 






RPLRSVE5 


X"08' 


Reserved 






RPLRSVE6 


X'04' 


Reserved 






RPLRSVE7 


X'02' 


Reserved 






RPLRSVE8 


X'OT 


Reserved 



RPL (1STRPL) ( Continued) 



Flags and Masks ( Continued) 








Flag 


Contains 


Mask 


Value 


Means 


RPLOPT12 


Twelvth Byte of 


RPLSEND 


X'80' 


0=Receive/l=Send 




Options 


RPLKEEP 


X'40' 


Receive KEEP 






RPLTRUNC 


X'20' 


Receive TRUNC 






RPLNIBTK 


X'lG" 


Receive NIBTK 






RPLSRCAC 


X'08' 


Resetsr SRCAC 






RPLCACS 


X'04' 


Resetsr CACS 






RPLSR 


X'02' 


Resetsr SR 






RPLFMHDR 


X'01' 


0=NFMHDR 
1-FMHDR 


RPLOPT5 


F if th Byte of 
Options 


RPLDLGIN 


X'80' 


Dialog Indicator 1 

1=CS, 0=CA 






RPLSSNIN 


X'40' 


Session Indicator 1 

1=CD, 0=ED 






RPLPSOPT 


X'20' 


PASS Option 






RPLNERAS 


X'10' 


Write NO ERASE 






RPLEAU 


X'08' 


Write ERASE 
UNPROTECTED 






RPLERACE 


X'04' 


Write ERASE 






RPLNODE 


X'02' 


Node Indicator 1 
l=Any, 0=Spec 






RPLWROPT 


X'OT 


Write Option —1 
l=Conv, 0=Nconv 


RPLOPT6 


Sixth Byte of 


RPLEOB 


X'80' 


End of Block 




Options 


RPLEOM 


X'40' 


End of Message 






RPLEOT 


X'20' 


End of Transmission 






RPLCOND 


X'10' 


Reset CONDITIONAL 






RPLNCOND 


X'08' 


Reset UNCONDITIONAL 






RPLLOCK 


X'04' 


Reset LOCK 






@NM00031 


X'02' 


Reserved 






RPLRSV68 


x'or 


Reserved 


RPLOPT7 


Seventh Byte of 


RPLCNALL 


X'80' 


Connect ALL 




Options 


RPLCNANY 


X'40' 


Connect ANY 






RPLCNIMM 


X'20' 


Connect IMMEDIATE 






RPLQOPT 


X'10' 


Open Destination Q Opt 






RPLTPOST 


X'08' 


l=Already Under 






RPLRLSOP 


X'04' 


Release Option 






RPLRSV77 


X'02' 


Reserved 






RPLRSV78 


x'or 


Reserved 


RPLOPT8 


Eight Byte of 


RPLODACQ 


X'80' 


Acquire 




Options 


RPLODACP 


X'40' 


Accept (Default) 






RPLODPRM 


X'20' 


Preempt 






RPLPEND 


X'10' 


Pend (Default) 






RPLSESS 


X'08' 


Session 






RPLACTV 


X'04' 


Active 






RPLUNCON 


X'02' 


Unconditional 






RPLRSV88 


x'or 


Reserved 



RPL (1STRPL) ( Continued) 



Flags and Masks (Continued) 








Flag 


Contains 


Mask 


Value 


Means 


RPLOPT9 


Ninth Byte of 
Options 


RPLLOGON 


X'80' 


Inq LOGON Msg 
(Default) 






RPLDEVCH 


X'40' 


Inq DEVICE Char 






RPLTERMS 


X'20' 


Inq TERMS 






RPLCOUNT 


X'10' 


Inq COUNTS 






RPLAPPST 


X'08' 


Inq APPSTAT 






RPLRNNM 


X'04' 


Inq RNNAME 






RPLCIDE 


X'02' 


Inq CIDXLATE 






RPLTOPL 


X'OT 


Inq TOP LOGON 


RPLPOST 


Event Complete 


<S>NM00029 


X'80' 


Reserved 


RPLRH3 


Third RH Byte 


RPLBB 


X'80' 


BRACKET 0=NBB 

1=BB 

BRACKET 0=NEB 






RPLEB 


X'40' 










1=EB 






RPLCMD 


X'20 1 


CHNGDIRO=NCMD 
1=CMD 






RPLCHREQ 


X'10' 


CHNGDIR 0=NREQ 
1=REQ 






©NM00032 


X'OF' 


Reserved for VTAM 


RPLSRTYP 


Send or Receive 


RPLSTYPE 


X'FO' 


Send TYPE 




Type 


RPLSRESP 


X'80' 


STYPE 0=REQ 
1=RESP 






@NM00033 


X'70' 


Reserved for VTAM 






RPLRTYPE 


X'OF' 


Receive TYPE 






RPLRRESP 


X'08' 


RTYPE 0=NRESP 
l=RESP 






RPLNFSYN 


X'04' 


RTYPE 0=DFSYN 
1=NDFSYN 






RPLDFASY 


X'02' 


RTYPE 0-NDFASY 
l=DFASY 






RPLRREAD 


X'OT 


RTYPE 0=NREAD 
1=READ 


RPLSSEI 


Sys SNS Error 


RP LP AT HI 


X'80' 


SSENSEI Path 




Codes 


RPLCPMI 


X'40' 


SSENSEI CPM 






RPLSTATI 


X'20' 


SSENSEI State 






RPLFII 


X'10' 


SSENSEI Fl 






RPLRRI 


X*08' 


SSENSEI RR 






@NM00030 


X'07' 


Reserved for VTAM 


RPLSSEO 


System Sense 


(3NM00043 


X'80' 


Reserved for VTAM 




Error CD 


RPLCPMO 


X'40' 


SSENSEO CPM 






RPLSTATO 


X*20' 


SSENSEO State 






RPLFIO 


X'10' 


SSENSEO Fl 






RPLRRO 


X'08' 


SSENSEO RR 






@NM00044 


X'07' 


Reserved for VTAM 


RPLVTFL1 


VTAM Flags 


RPLVTSWC 


X'80' 


SWITCH 

0=NO / 1=YES 






RPLVTUSE 


X'40' 


SWITCH 0=APP 
1=SYSTEM 






@NM00034 


X'3F' 


Reserved for VTAM 



RPL (1STRPL) ( Continued) 



Flags and Masks (Continued) 








Flag Contains 


Mask 


Value 


Means 


RPLVTFL2 VTAM Flags 


RPLPOSTV 


X'FO' 






RPLSCHED 


X'80' 


POST 0=RESP 
1 = SCHED 




@NM00035 


X'70' 


Reserved for VTAM 




RPLRESP 


X'OF' 






@NM00036 


X'08' 


Reserved for VTAM 




RPLEX 


X'04 1 


RESPOND 0=NEX 
1=EX 




RPLNFME 


X'02' 


RESPOND 0=FME 
1=NFME 




RPLRRN 


X'01' 


RESPOND 0=NRRN 
1=RRN 



Hex 




108 
112 



6C 
70 



RRNPRE 
Use ISTRPRE DSECT 



RRNGRPA 
Pointer of first group entry 



RRNRNCUA 
Channel unit address 



RRNRSV22 
Reserved 



RRNTRENT 
Address term entry in local 



RRNBHSET 
Pointer to table of BHSET names 



RRNCTBHS 
Count of BHSET names in RRNBHSET 



RRNCTELI 
Count of link entries for RN 



RRNCTETR 
Count of terminal entries for RN 



RRNCTEGP 
Count of group entries for RN 



RRNCTECL 
Count of cluster entries for RN 



RRNCTEIN 
Count of int. node entries for RN 



RRNCTECM RRNCTENT | 

CNT of component entries for RN Number all entries in 370X RDT segment 



RRNRDF 
Resource definition flag 



RRNRSV23 
Reserved 



RRNNMCKD 
Filename for checkpoint data set 



RRNCPLUB 
Symbolic unit name of NCP dafaset 



RRNEPADR 
EP subchannel address 



RRNNMDPD 
Filename for CKPT data set 



RRN (continued) 



Dec Hex 
180 U 



RRNRSV04 
Reserved 



RRNDELAY 
Initial value from delay 



RRNNMNCP 
Dsname for NCP load module 



RRNHPRE 
Host prefix information 



RRNHBUFS 
Size of buffer units for host 



RRNCTPCC 
CNT of buffers 
receiving PCCU 
Data 



RRNNCPNM 
Name of NCP load mod 7 char max 



RRNRSV14 
Reserved 



RRNRSVOA 
Reserved 



RRNNCSPL 
Pointer to NCSPL 



RRNLASTE 
PTR to last entry in RN segment 



RRNVYRPH 
Address of vary RPH waiting for restart completion 



RRNRDCUA 
Default CUA 



RRNRVPT3 
Reserved 



RRNRINNM 
Default innode name in local RDT to connect remote R 



ORG RRNADR + 1 



RRN LOAD 
UCB/PUB address 



RRN (continued) 



12 3 



Flags (word 
1 byte 1) 



ORGRRNRDF + .1 



ORG RRN RDF + 3 



RRN RDF B 
Flag field B (RDF) 



RRNSTCNT 

. Active sub- 

ncde count 



RRNCMFA 
Flag field A 
command 



ORG RRNCMF + 2 



ORG RRNCMF + 3 



ORG RRNNMDPD 



RRNCMFB 
Flag fieldB 
command 



RRNCMF C 
Flag field C 
command 



RRNCMFD 
Flag field D 
Command 



RRNDPLUB 
LUB name for dump dataset 



RRN PUB I 
PUB index 



RRNRSV88 
DOS only 



RRNHLENH 
Length of host 
header prefix 



RRNHLENT 
Length of host 
text prefix 



Flags and masks 
Disp. Flog 



Value Means 



148(94) RRNCMEA Flag field A command RRNCAALL X'80' All options 

RRNCAATD X'40 ' Activate device 



RRN (continued) 



Flogs and masks 

Disp. Flag Contains 

148(94) (continued) 



149(95) RRNCMFB Flage field B 

commands 



150(96) RRNCMFC F lag field C - 
commands 



151(97)RRNCMFD 



Flag Field D - 
commands 



108(66) RRNF LAG 



144(90) RRNRDFA Flags (word 1 

byte 1) 



RRNCAATG 


X'20' 


Activate group 


RRNCAATI 


X'10' 


Activate invites 


RRNCAMBH 


X'08' 


Modify block handler set 


RRNCACDT 


X'04' 


Change date and time 


RRNCADTD 


X'02' 


Deactivate device 


RRNCADGO 


X'Ol' 


Deactivate group orderly 


RRNCBDLO 


X'80' 


Deactivate line orderly 


RRNCBDLH 


X'40' 


Deactivate line halt 


RRNCBDLR 


X'20' 


Display line resource ID 


RRNCBRDS 


X'10' 


Request device status 


RRNCBRLS 


X'08' 


Request line status 


RRNCBNPL 


X'04' 


Change line neg poll 
response LIM 


RRNCBMOD 


X'02' 


Copy/set destination node 


RRNCBALT 


x'or 


Activate line trace 


RRNCCRCN 


X'80' 


Reset conditional 


RRNCCRDQ 


X'40' 


Reset device queue 


RRNCCRST 


X'20' 


Request device statistics 


RRNCCCRC 


X'10' 


Change retry counts 


RRNCCRIM 


X'08' 


Reset immediate 


RNNCCRCM 


X'04' 


Reset control mode 


RRNCCSIM 


X'02' 


Copy/replace session 
unit info 


RRNCCCSL 


x'or 


Change session limit 


RRNCDCSP 


X'80' 


Change service pause 


RRNCDSTD 


X'40' 


Display storage 


RRNCDDTL 


X'20' 


Change device transmit 


RRNCDBCK 


X'10 


Switched network backup 


RRNCDDSI 


X'08' 


Copy/replace DEV 
session init info 


RRNCDREC 


X'04' 


Reset at end of command 


RRNREMPO 


X'02' 


Remote power off 


RRNRSV05 


X'Ol' 


Not used 


RRNRSV89 


X'80' 


Reserved 


RRNRBISA 


X'40' 


Initial status 1 = active 


RRNLCSIP 


X'20' 


Node being activated 


RRN LCD IE 


X'10' 


Higher node not 
succesfully activated 


RRN LC PIP 


X'08' 


Node being deactivated 


RRNERPIP 


X'04' 


ERP in process 


RRNDSTCT 


X'02' 


Deact to decrement stent 


RRNRSV11 


x'or 


Unused/reserved 


RRNRASHT 


X'80' 


Auto network shutdown 


RRNRAIPL 


X'40' 


Auto IPL on RN failure 


RRNRADMP 


X'20' 


Autodump on RN failure 


RRNRACHK 


X'10' 


Checkpoint restart 


RRNRAOLT 


X'08' 


On-line terminal test 


RRNRBREM 


X'04' 


Remote RN flag 


RRNRANCP 


X'02' 


Generation type NCP 


RRNRAPEP 


x*or 


Generation type PEP 



RNN (continued) 

Flags and masks 
Disp. Flag 
145(91) RRNRDFB 



Flag field B 
(RDF) 



Value Meaning 



RRNRBMDL 


X'80' 


RRNRSV02 


X'40 1 


RRNRBCCL 


X'20' 


RRNRBCCT 


X'10' 


RRNRBSEC 


X'08' 


RRNRBCT1 


X'04' 


RRNRBCT2 


X'02' 


RRNRSV03 


X'or 


RRNRBBUP 


X'80' 



RRNVYDON X'40' 
RRNRSV01 X'3E' 

RRNPTASL X'01' 



(=1 IF 3705) Else 3704 

Reserved 

Loosely coupled channel 

Tightly coupled channel 

Secondary channel exist 

Prim chan type 

(0 = type 1,1= type 2) 

Sec chan type 

(0 =type 1, 1 = type 2) 

Reserved 

Bringup IS to be 

exercised for this RN 

during IPL 

RDT seg is being freed 

Reserved 

Some port solicitor 

is waiting to be 

redriven by C 



Dec Hex 




ORG SNTENTRY 



ORGSNTWORD1 



SNTFLAG 
F lag byte 



SNTNENTS 
Number of entries in this SNT 



SNTRSRVD 
Reserved to force DWORD BDY 



ORG SNTWORD 1+1 



ORG SNTENTRY + 4 



SNTENTRY 
SNT entry 



SNTWORD 1 
Flag and pointer field 



SNTCBPTR 
PTR to DNCB, ICNCB, LDNCB, ETC 



Flags and masks 
Disp. Flag 
8(8) SNTFLAG 



F lag byte 



SNTRDTFG X'80' RDT entry 

Flag, 1 = RDTE, = NCB 
SNTRSVFG X'7F' Reserved 



TH (ISTTH) 



Dec 




Hex 







1 


2 


3 


THRLAG1 
TH flag byte 


THDAP 
Destination address 


THOAF 
Original address 


THSNF 
Sequence number 


THDCF 
Data count 







ORGTHFLAG 1 + 1 



THFLGB 

Header flag 

fields 



Flags 


and masks 










Disp. 


Flag 


Contains 


Mask 


Value 


Means 


0(0) 


THFLAG1 


THFlag bytes 


THFID 


X'FO' 


Format ID 








THFLGA 


X'OF' 


Header BIT flags 








THMPF 


X'OO 


Mapping field 








THPSI 


X'02' 


Primary -secondary 
indicators 








THAFI 


xor 


ASYN flow indicator 


HD 


THFLGB 


Header flag fields 


THPYE 


X'FO' 


Priority 








THSEF 


X'OC 


Security 








THCDF 


X'03' 


Code defination 



Constants in 


ISTTH 




Label 


Value 


Meaning 


THFIDO 


B'0000' 


FID value 


THFID1 


B'OOOT 


FID 1 value 


THSYNREQ 


X'1000' 


Synchronous request 


THSYNRES 


X'lEOO' 


Synchronous response 


THASYRES 


XMFOO' 


Asychronous response 


THCNOSEG 


BMl' 


No segmenting 


THCPTOS 


B'r 


Primary to secondary 


THCSTOP 


B'O' 


Secondary to primary flow 


THCNOPYF 


B'0000' 


No priority 


THCNOSEF 


B'OO' 


No security 



TIE ( 


ISTTIE) 












Dec 


Hex 



4 
8 
C 





1 


2 


3 





TIETYPE 
Control block 
type code 


TIELNGTH 

Length in 
bytes 


TIERETCD 
Return code from 
TOLTEP 


TIEREQ 
Tie usage code 


4 


TIETIE A 
Address of next tie 


8 


TIESNA 
Address of symbolic name 


12 


TIERPHA 
Address of RPL header 




OR 


G TIESNA 








8 


8 


TIEPTR1 
First pointer 




OR 


G TIERPHA 








12 


C 


TIEPTR2 
Second pointer 


F lags and mas 
Disp. Flag 
4(4) TIETIE 

Constants in 1 


cs 

Contains 
A Address of 

5TTIE 


Mask 
nextTIE TIEGATE 


Value 
X'80' 


Means 
Gating flag 



Type code for TIE 



TIE usage codes 

TIEREQO RFT req passed to TOLTEP 

TIEREQ1 1 Vary passed FSB to TOLTEP 

TIEREQ2 2 Vary passed NCSPL to TOLTEP 

TIEREQ3 3 Req. for an end -CTL to vary 

TIEREQ4 4 Req. for freeing buffers 

TIEREQ5 5 TOLTEP req info from SSCP 

TIEREQ6 6 TOLTEP pass LCPB to vary 

TIEBASIC Basic support for device RFT received for 

TIERCRD 4 Record support for device RFT received for 



CHAPTER 111 

VSAM CONTROL BLOCKS 




VSAM CONTROL BLOCK STRUCTURE FOR A KEY-SEQUENCED DATA SET 



User's record management request: 



GET,PUT,POlNT,ERASE,or ENDREQ 



ISAM user: 
Rl 



t DTFIS 


DTFIS , 


> 




X'll' LOGMODAD 


X'2C AMDTFAD 


X'30' CIPROCAD 



X'90' ACBAD 



X'9C DTFISAD 



Note: Present only if 
using IIP 



DOS/VS 
COMREG 



-J 





IIPPRCPR 




Branch vector 




Address table 





"I 



Describes the VSAM 
record processing 
request 



X'18' tACB 



_^J Describes the VSAM 
data set 



X'04' t AMBL 



:'08' ! Record 
management 
load module 



X'30' f EXLST 



X'04' 
t Data AMDSB 



t Index AMDSB 



X'OC 
t PLH's 



X'14' 
t ACB 



X'40' 
t Exclusive Ctrl list! 



User exit routines 


t LERAD 


* SYNAD 


t EODAD 


t EXCPAD 



See figure: 
Data and index 
control block 



DATA AND INDEX CONTROL BLOCK STRUCTURE 





AMBL 






Data AMDSB 




EDB 




EDB's 






Describes an opened 
cluster 




Statistical 
information 




Describes a disk extent 
(1EDB for each extent) 








1 




























■■* 






1 








X'04 1 
♦ Data AMDSB 


X'CO' 
t EDB 


X'OO' 
tNext EDB 


1 




















X'08' 
t Index AMDSB 




X'24' 
t ARDB 








X'14 1 
tLPMB 




Data ARDBs 
















Space allocation info 
(RBA) for each key 


1 


X'OC 
♦ PLH's 






X'AC 
t BCB 






X'l8' 
♦ ARDB 








1 
















X'14' 
+ ACB 


X'B4' 

\ CCW build area 








X'OC 
t EDB 








X'40" 
t Exclusive ctrl list 










LP MB 




X'14' 

t Index ARDB 


PI H< 




Describes physical 
disk attributes 




X'50' • 




. .... 1 












1 


t PLHs of base cluster 






Information about 
current request 






1 




X'54' • 
t USB 




























BQ-Bs 










t RPLs 




Data BHD 






Status info about a 
buffer(l for each buffet) 


1 


lr.r4ov AMrKR 




Information about 
buffers 




1 






f 


t ECB 






















Same control block 
structure as data 
AMDSB 




X'04' 
1 Buffer 


t Current ARDB 






X'14' 

iBuffer queues 












X'44' 

T next BCB in queue 




X'114' 
t BHD 








> 














1 




The base cluster AMBL 
points to the USB. The 
AIX AMBLs points to the 


t Current BCB 






Data tree / data l/CJ queue 


1 






BCB 




t 


f Current buffer 
t THB 








Buffers 












1 




BCB 








1 
















1 



MULTIPLE STRING CONTROL BLOCK STRUCTURE 



Rl during 
execution of 
subtask 1 



Rl during 
execution of 
subtask 2 



* RPL2 








Rl during 
execution of 
subtask n 




RPLn , 


I RPLn 









f PLH 



Note: PLH1 is not permanently assigned to RPL1, etc. 
PLHs are assigned as required. 



BASE CLUSTER TO ALTERNATE INDEX CONTROL BLOCK STRUCTURE 
Alternate Index 1 



p ath 




CATALOG MANAGEMENT CONTROL BLOCKS 



t Label cylinder info 



t DADSM 
parameter list 



t CPL 



-® 



t 1 ACB (current) 



t catalog record 
in a buffer 



t's to fields ii 
the buffer 



t RPL (current) 



I Next available 
space in work area 



t CMS work area 



f CRAdefinitic 
work area 



I CRA buffer chain 



256-byte label record 



DADSM parameter list 



-» Volume identifier 



f Label cylinder info 



+ I/O area 



VTOC information 



-© 



-© 



ACB (Master catalog) 



Describes the catalog 
as a VSAM key- 
sequenced data set 



RPb (Master catalog) 

Describes the VSAM 
record processing 
request 



DOS/VS_ 



AMCBS 



Interface between 
ANCHTand the VSAM 
catalog control 
blocks 



CAXWA chain 



I 's control blocks 
and work areas 
needed for catalog 
processing 



© 

® L See fig.: CALLER-SUPPLIED 
/-n CONTROL BLOCKS 

^ FOR CATALOG — 



Control blocks for further 
catalogs and CRAs (if present) 



ACB (job catalog) 



RPb (job catalog) 



ACB(e . g . user cata lo g) 



RPLs(e. g. user catalo g) 



RPb (e.g. CRA) 



®- 



CALLER-SUPPLIED CONTROL BLOCKS FOR CATALOG MANAGEMENT 
FPL 



r\_ » * Catalog 
identifier 



1 — t Work area 



t Catalog record 
identifier 



Information for 
locating the CRA 



Work area 



/pv p Available space 



4 Field's data 



FPL for tests 



_^ 4 Field name 



Test condition 



t FPL=0: 
no more tests, or 
+ FPL for next 
test 



r— t Test data 



Jest dqtq qrgq 



t's to user-supplied 
information fields and |— - 
lists 



FVT (data) 



♦ FPL=0: 
no tes ts 



♦ Work area: 
Update data or field's 
(retrieved) data and 
length 



L-- * 



FVT (space) 



L — * 



— m 

4°i 



xS a 

,5 1 



ACCESS METHOD BLOCK LIST (AMBL) 



Disp 


acement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 












AMBLST 




Beginning of AMBL 




1 




1 


2 
1 


AMBLID 
AMBLACT 


X'lT 


AMBL identifier 
AMBL active byte 


2 


2 


2 


AMBLLEN 




Length of control block 


4 


4 


4 


AMBLDTA 




Pointer to data AMDSB 


8 


8 


4 


AMBL IX 




Pointer to index AMDSB 


12 


C 


4 


AMBLPLHF 




Pointer to first PLH 


16 


10 


4 


AMBCHAIN 




Reserved 


20 


14 


4 


AMBLACB 




Pointer to ACB 


24 


18 


2 


AMBLPLHL 




Length of PLH 


26 


1A 


1 


AMBLPLHN 




Total number of strings 


27 


IB 


1 


AMBLFLAG 




flag byte 








AMBLPOST 


X'80' 


POST must be issued 


28 


1C 


4 


AMBAM3UF 




Size of buffer space 


32 


20 


2 


AMBMACRF 
AMBMACR1 




Flags (copy of flags in 
ACBMACR1 and 
ACBMACR2) 
First byte: 








AMBKEY 


X'80' 


Access data via index 








AMBADD 


X'40' 


Access without index 








AMBADR 


X'40' 


Access without index 








AMBCNV 


X'20' 


Control interval processing 








AMBSEQ 


X'10' 


Sequential processing 








AMBD1R 


X'08 1 


Direct processing 








AMBIN 


X'04' 


GET, READ processing 








AMBOUT 


X'02' 


PUT, WRITE processing 








AMBUBF 


x'or 


User buffers 








AMBMACR2 




Second byte: 








AMBSKP 


X'20 1 


Skip sequential accessing 








AMBRST 


X'10' 


Reusable Data Set 








AMBAIX 


X'08' 


AIX processing 








AMBOPEN 


x'or 


Open is in process 


34 


22 


2 


AMBLTLEN 




Length of GETVIS for 
AMBL, PLH, etc. 


36 


24 


2 


AMBDBUF 




Number of data buffers 


38 


26 


2 


AMBIBUF 




Number of index buffers 


40 


28 


4 


AMBLOPWA 




Fointer to open work area 


Split Control 


44 


2C 


4 


AMBSECB 




Split/speudo-split ECB 


44 


2C 


1 


AMBS0 




Reserved 


45 


2D 


1 


AMBS1 




Reserved 


46 


2E 


1 


AMBSC0M 




ECB post byte 








AMBSWAIT 


X'80' 


Wait bit share 


47 


2F 


1 


AMBSECBT 




Share gate test and set byte 


48 


30 


4 


AMBBECB 




ECB fo Buffer Manager 


48 


30 


1 


AMBB0 




Reserved 


49 


31 


1 


AMBB1 




Reserved 


50 


32 


1 


AMBBCOM 




ECB Post byte 








AMBBWAIT 


X'80' 


Wait bit-buffer manager 



ACCESS METHOD BLOCK LIST (AMBL) (. . .Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




51 


33 




AMBBECBT 




Buffer gate-test and 
set byte 


52 


34 


4 


AMBLORBA 




Low RBA of control area 
being split 


56 


38 


4 


AMBHIRBA 




High RBA of control area 
being split 


60 


3C 


4 


AMBPLH 




Address of PLH in control 


Pointers 


64 


40 


4 


AMBALIST 




Exclusive control list 
address 


68 


44 


4 


AMBLRPLS 




Address of RPL causing split 


72 


48 


4 


AMBLCLWA 




Pointer to close work area 


76 


4C 


4 


AMBLCIWA 




Pointer to CI split work 
area 


80 


50 


4 


AMBLBC 




Pointer to base cluster 


84 


54 


4 


AMBLUSB 




Pointer to USB 


88 


58 


4 


AMBBCACB 




Pointer to BC-ACB 


92 


5C 


4 


AMBPEACB 




Pointer to PE-ACB 


96 


60 


4 






Reserved 



ACCESS METHOD CONTROL BLOCK (ACB) 



Disp 


acement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


ACBID 




ACB identifier = 'A0' 








ACBIDD 


X'AO' 


ACB equate 








ACBIDVAL 


X'AO' 


ACB equate 


1 


1 


1 


ACBACT 




Active byte test and set 
X'00' VSAM Release 1 
X'10' VSAM Release 2 
X'20' VTAM 


2 


2 


2 


ACBLEN 




Length of ACB in bytes 


2 


2 


2 


ACBLENG 




Length of ACB in bytes(l) 


4 


4 


4 


ACBAMBL 




Address of the AMBL 


8 


8 


4 


ACBAMO 




Pointer to VSAM code 


12 


C 


2 






Reserved 


14 


E 


2 


ACBDBUF 




Number of data buffers 


14 


E 


2 


ACBBUFND 




Number of data buffers 


16 


10 


2 


ACBIBUF 




Number of index buffers 


16 


10 


2 


ACBBUFN1 




Number of index buffers 


18 


12 


2 


ACBMACRF 




MACRF 


18 


12 


1 


ACBMACR1 




MACRF first byte 








ACBKEY 


X'80' 


Access data via index 








ACBADD 


X'40' 


Access without index 






ACBADR 


X'40' 


Access without index 








ACBCNV 


X'20' 


Control interval processing 








ACBSEQ 


XMO' 


Sequential processing 








ACBDIR 


X'08' 


Direct processing 








ACB IN 


X'04' 


GET 








ACBOUT 


X'02' 


PUT 








ACBUBF 


x'or 


User buffers 


19 


13 


1 


ACBMACR2 


X'80' 
X'40' 


MACRF second byte 

Reserved 

Reserved 








ACBSKIP 


X'20' 


Skip sequential access 








ACBRST 


X'10' 


Reusable data set 








ACBAIX 


X'08' 
X'04' 
X'02' 

x'or 


AIX processing 

Reserved 

Reserved 

Reserved for open AMBL 


20 


14 


1 


ACBDOSID 




DOS DTF identifier 








ACBDTFID 


X'28' 


DTF type for VSAM 


21 


15 


1 


ACBOFLGS 




Open/close flags 








ACBVOLMT 


X'80' 


Verify volume mounted 








ACBVMSG 


X'40' 


Message requested bit 








ACBEOV 


X'20' 


EOV detects completed 








ACBOPEN 


X'10' 


ACB is open 








ACB CAT 


X'08' 


ACB for VSAM catalog 








ACBEXFG 


X'04' 


User exit flag 








ACBKEYOK 


. x'or 


Key processing all right 
for this ACB 


22 


16 


1 


ACBNST 




Number of strings 


22 


16 


1 


ACBSTRNO 




Number of strings 


23 


17 


1 


ACBERFLG 




Error flags 



(1) If specified length id too small for a VSAM Rel 
built (X'00 1 mbyte 1). 



ease 2 ACB a Release 1 ACB is 



ACCESS METHOD CONTROL BLOCK (ACB) (■ . .Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec Hex 






Digit 












Open error return codes : 






ACBOALR 


X'04' 


This ACB is already open 






ACBOLLUB 


X'OE' 


The symbolic unit in the 
DLBL statement is invalid 






ACBONJIB 


X'OF' 


No job information blocks 
(JIBs) are available from 
the label information 
cylinder. 






ACBOLIGN 


XMT 


The address in the 
ASSIGN statement for the 
logical unit was IGN 
(assignment ignored). 






ACBOLUNA 


X'12' 


The address in the 
ASSIGN statement for the 
logical unit was UA 
(logical unit unassigned). 






ACBOCEXT 


X'22' 


The volume serial numbers 
specified in the EXTENT 
statement do not match 
those specified in the 
catalog entry. 






ACBOCDLD 


X'32' 


Unable to load VSAM 
modules via a CD LOAD 
macro instruction. 






ACBONMNT 


X'50' 


Attempt to mount two 
volumes on the same drive 
when direct or keyed 
processing was specified. 
Or the operator failed to 
mount the volume. 






ACBONCRA 


X'5C 


CRA volume not mounted 






ACBOIERR 


X'oO' 


Unusable input data set 






ACBOUEMP 


X'64' 


Empty upgrade AIX 






ACBOTMST 


X'68' 


The time stamp of the 
volume on which a data 
set is stored doesn't match 
the system time stamp in 
the volume catalog entry. 






ACBOTIME 


X'6C 


The system time stamp of a 
data set and its index do 
not match, this indicates 
that the data has been up- 
dated separately. This 
test is greater than or 
equal, i.e., no warning 
is given if the index time 
stamp is greater than the 
data time stamp. 






ACBOEMPT 


X'6E' 


Open empty data set for 
read only. 



ACCESS METHOD CONTROL BLOCK (ACB) (. . .Continued) 



Displacement 
Dec Hex 



Bytes 



Hex 
Digit 



Description 



ACBODSNC 
ACBODEVT 



X'74' 
X75' 



Data set was not closed the 
last time it was processed 
The symbolic unit specified 
in the EXTENT statements 
is not a valid VSAM 
device type. 
The D LB L statement is 
missing or the filename in 
the DLBL doesn't match the 
ACB. 

A permanent I/O error 
occurred while VSAM was 
reading label information 
from the label information 
cylinder. 

Not enough virtual storage 
space is available in the 
partition for work areas, 
control blocks, or buffers. 
A permanent i/O error 
occurred while VSAM was 
reading or writing a 
catalog entry. 
CATX'94' found in the 
catalog for this ACB. 
Security verification failed; 
the password specified in 
the ACB for a specific level 
of access doesn't match the 
password in the catalog for 
that level of access. 
The operands specified in 
the ACB are inconsistent 
with each other or with the 
information in the catalog 
entry, for example, an open 
of an ESDS for keyed 
processing. 

User-specified buffers with 
keyed access (user buffers 
can be specified only with 
CNV access). 
A permanent I/O error 
occurred while VSAM was 
reading the volume label of 
the volume the data is set on 
The data set is not available 
because it is being updated 
by (under the exclusive 
control of) another ACB or 
has been exported by 
Access Method Services. 



ACCESS METHOD CONTROL BLOCK (ACB) (...Continued) 



Displa 


:ement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










ACBONOCT 


X'B4' 


The VSAM catalog is not 
connected to the system 
on logical unit SYSCAT. 








ACBOACT 


X'BC 


ACB was active 








ACBOOERR 


X'CO' 


Unusable output data set 








ACBOPEMP 


X'C4' 


Access via empty path 








ACBODSCB 


X'C8' 


DSCB format 4 error 








ACBOCNVP 


X'EO' 


Invalid control interval 
procedure 








ACBONRST 


X'E8' 


Non-reusable is not empty 








ACBOCTER 


X'FF' 


Unexpected return from 
catalog locate function. 

Close error return codes: 








ACBCALR 


X'04' 


ACB already closed 








ACBCNVRT 


X'88' 


Insufficient space available 
in user's partition for 
work area 








ACBCIOCA 


X'90' 


Permanent I/O error 
occurred while VSAM was 
reading or writing a 
catalog entry. 








ACBCNCAT 


X'94' 


No catalog entry found 








ACBCIOER 


X'B8' 


Permanent I/O error 
occurred while VSAM was 
completing outstanding 
I/O requests. 








ACBCBUSY 


X'BC 


ACB busy 


24 


18 


4 


ACBAMBUF 




Length of buffer pool 


28 


1C 


8 


ACBDDNM 




DDname 


36 


24 


4 


ACBPRTCT 




Pointer to password 


40 


28 


4 


ACBUAPTR 




Pointer to user work area 


44 


2C 


4 


ACBBFPL 




Pointer to first data buffer 
in buffer pool 


48 


30 


4 


ACBEXLST 




User exit list pointer 


52 


34 


4 


ACBNXT 




Reserved 


56 


38 


1 






Reserved for BSTRNO 


57 


39 


1 


ACB INF LG 




Catalog recovery flag byte 








ACBSCRA 


X'80' 


CRA flag system 








ACBUCRA 


X'40' 
X'20' 
X'10' 
X'08' 
X'04' 
X'02' 

x'or 


CRA flag user 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 


58 


3A 


2 


ACBMSGLN 




Message area length 


60 


3C 


4 


ACBMSGAR 




Message area 


64 


40 


4 


ACBMLOAD 




CBM module load address 



ACCESS METHOD CONTROL BLOCK STRUCTURE BLOCK (AMCBS) 



Displa 


cement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 






1 




1 


1 

1 


CBS ID 
CBSFLAGS 


X"00' 


AMCBS identifier 
AMCBC flags 








CBSJCAT 


X'80' 


Job catalog not present 


2 


2 


4 


CBSSIZ 




Length of the AMCBS 


4 


4 


4 


C3SCRACB 




Pointer to CRA ACB 


8 


8 


4 


CBSACB 




Pointer to ACB (Master) 


12 


C 


4 


CBSCRAPL 




Pointer to AMS 
CRAAP list 


16 


10 


4 


CBSSYSUC 




Pointer to job catalog 
ACB 


20 


14 


4 


CBSCAXCN 




Pointer to CAXWA 
chain 



ACCESS METHOD DATA STATISTICS BLOCK (AMD5B) 



Disp 


acement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










96 


AMDSBCOM 




Common part 




1 




1 


1 
1 


AMDSBID 
AMDATTR 
AMDATTRl 


X'60' 


AMDSBidentifier 
Attributes of the data set 
Attributes (first byte) : 








AMDDST 


X'80' 


Key-sequenced data 

set 1 

Entry-sequenced data 
set 








AMDWCK 


X'40' 


Check each record when 
it is written 








AMDSDT 


X'20' 


Sequence set is stored 
with the data 








AMD RE PL 


X'10' 


Replication 








AMDORDER 


X'08' 


Use the volumes in the 
same order as the 
volume list 








AMD RANGE 


X'04' 


The data set is divided 
into key ranges 








AMDRRDS 


X'02' 


Relative record data set 








AMDS PAN 


x-or 


Spanned records 


2 


2 


2 


AMDLEN 
AMDAXRKP 




Length of AMDSB in the 

catalog 

Index section 


6 


6 


2 


AMDRKP 




Relative key posit ion 


8 


8 


2 


AMDKEYLN 




Key length 


10 


A 


1 


AMDPCTCA 




Percentage of free 
control intervals in the 
control area 


11 


B 


1 


AMDPCTCI 




Percentage of free bytes 
in the control interval 


12 


C 


2 


AMDCIPCA 




Number of control 
intervals in a control 
area 


14 


E 


2 


AMDFSCA 




Number of free control 
intervals in a control 
area 


16 


10 


4 


AMDFSCI 




Number of free bytes in 
a control interval 


20 


14 


4 


AMDCINV 




Control interval size 


24 


18 


4 


AMDLRECL 




Maximum record size 


28 


1C 


4 


AMDHLRBA 




RBA of the high-level 
index record 


28 


1C 


4 


AMDNSLOT 




Number of relative 
record slots 


32 


20 


4 


AMDSSRBA 




RBA of first seq. record 


32 


20 


4 


AMDMAXRR 




Max. relative record 
number 


36 


24 


4 


AMDPARDB 




Pointer to first ARDB 



ACCESS METHOD DATA STATISTICS BLOCK (AMDSB) (...Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




40 


28 


1 


AMDATTR3 




Attributes 








AMD UNO 


X'80' 
X'40' 
X'20' 
X'10' 
X'08* 
X'04' 
X'02' 
X'Ol' 


0=unique; l=non-unique 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 


41 


29 


3 






Reserved 


44 


2C 


4 






Reserved 


Statistics 


48 


30 


4 


AMDSTAT 




Statistics 


48 


30 


8 


AMDSTMST 




System time stamp 


48 


30 


8 


AMDSTSP 




System time stamp 


56 


38 


2 


AMDNIL 




Number of index levels 


58 


3A 


2 


AMDNEDB 




Number of EDBs 


58 


3A 


2 


AMD NEXT 




Number of extents in the 
data set 


60 


3C 


4 


AMDNLR 




Number of user-supplied 
(logical) records in the 
data set 


64 


40 


4 


AMDDELR 




Number of deleted records 


68 


44 


4 


AMDIREC 




Number of inserted records 


72 


48 


4 


AMDUPR 




Number of updated records 


76 


4C 


4 


AMDRETR 




Number of retrieved 
records 


80 


50 


4 


AMDASPA 




Number of bytes of free 
space in the data set 


84 


54 


4 


AMDNCIS 




Number of times a control 
interval was split 


88 


58 


4 


AMDNCAS 




Number of times a control 
area was split 


92 


5C 


4 


AMDEXCP 
AMD CO MM 




Number of times EXCP was 
issued by VSAM I/O 
routines 


General Continue 


96 


60 


1 


AMDSHOPT 




Share option byte 








AMDSHR1 


X'80' 


Share option 1 








AMDSHR2 


X'40' 


Share option 2 








AMDSHR3 


X'20' 


Share option 3 








AMDSHR4 


X'10 1 


Share option 4 


97 


61 


4 


AMDCDSN 




Pointer to catalog ACB 


101 


65 


3 


AMDDSN 




Catalog control interval 
number for data (index) 


104 


68 


4 


AMDHWRBA 




High-water RBA for the 
data set 



ACCESS METHOD DATA STATISTICS BLOCK" (AMDSB) (. . .Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




108 


6C 


1 


AMDATTR2 




Attributes (second byte): 








AMD RE L 


X'80' 


Release unused space 








AMD LOAD 


X'40' 


Load mode 








AMDSPEED 


X'20' 


Speed option 








AMDINDX 


X'10* 


Index option 








AMDSHR 


X'08' 


Sharing 








AMDKR 


X'04' 


Key-range processing, 
duplicate of 
AMDRANGE 








AMD CAT 


X'OT 


AMDSB fcr catalog 


109 


6D 


.1 


AMDACT 




AMDSB test and set byte 


no 


6E 


..2 


AMDFILT 




User area (ISAM 
compatibility) 


112 


70 


4 


AMDPVOL 




Pointer to volume list 


116 


74 


1 


AMDAMS 




AMS flag byte 








AMDAIX 


X'80' 


Alternate index 








AMD PATH 


X'40' 


Access via path 








AMDBASE 


X'20' 


Access via base 


117 


75 


1 






Reserved 


118 


76 


2 


AMDAIRKP 




AIX relative key 
position 


Local Statistics 


120 


78 


4 


AMDLSTAT 




Local statistics 






2 


AMDLNIL 




Local number of index 

levels 

Local number of entries 


122 


7A 


..2 


AMDLNEST 














in the index section 


124 


7C 


4 


AMDLNLR 




Local number of user- 
supplied (logical) records 


128 


80 


4 


AMDLDELR 




Local number of deleted 
records 


132 


84 


4 


AMDLIREC 




Local number of inserted 
records 


136 


88 


4 


AMDLUPR 




Local number of updated 
records 


140 


8C 


4 


AMDLRETR 




Local number of retrieved 
records 


144 


90 


4 


AMDLASPA 




Local byles of free space 


148 


94 


4 


AMDLNCIS 




Local number of control 
interval splits 


152 


98 


4 


AMD LN CAS 




Local number of control 
area splits 


156 


9C 


4 


AMDLEXCP 




Local number of EXCPs 
issued by VSAM I/O 
routines 


Exceptional Exit 


160 


A0 


8 


AMDEXEXT 




Exception exit 



ACCESS METHOD DATA STATISTICS BLOCK (AMDSB) 



.Continued) 



Displacement 
Dec Hex 


Bytes 


Field Name 


Hex 
Digit 


Description 


Buffer Management Information 


168 A8 
170 AA 

172 AC 

176 BO 

180 B4 
184 B8 


2 
2 

4 

4 

4 

8 


AMDBCBNO 
AMD3FREE 

AMDFSBCB 

AMDFFBCB 

AMDCCWA 

AMDCCWA 




Number of buffers 

Number of unassigned 

buffers 

Address of the first 

BCB 

Address of the first 

free BCB 

Pointer to CCWbuiid 

area 

Reserved 


EDB Header 


192 CO 
196 C4 
198 C2 


4 
2 
..2 


AMDFSEDB 
AMDLEDB 




Address of first EDB 

Reserved 

Length of EDB 



ACCESS METHOD DEFINE THE FILE (AMDTF) TABLE 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








72 


SAVARPP 




Used to store register 
contents of problem 
program 


72 


48 


72 


SAVARCI 




ISAM interface 
program save area 


144 


90 


4 


ACBAD 




Address of ACETl Used 
by 
SIIPOPEN 
to open 


148 


94 


4 




X'0A020000' 


SVC 2 J the ACB 


152 


98 


4 


RPLAD 




Address of RPL 


156 


9C 




EREPL 




Error exit parameter list 


156 


9C 


4 


DTFISAD 




Address of DTFIS 


160 


A0 


4 


EPLRECAD 




Address of record in 
error (not supported by 
IIP) 


164 


A4 


8 


EPLDASDA 




DASD address of record 
in error (not supported 
by IIP) 


172 


AC 


1 


EPLRECID 




Record identification 








EPLRECID 


X'80' 


Data record (VSAM 
data set) 








EPLXREC 


X'40' 


Index record (VSAM 
sequence set) 








EPLCXREC 


X'20' 


Cylinder index record 
(VSAM index set) 








EPLMXREC 


X'10' 


Master index record 
(VSAM index set) 








EPLREAD 


X'02' 


Read 








EPLWRITE 


X'OT 


Write 


173 


AD 


1 


EPLCMNDC 


X'OO' 


Command code of 
failing CCW (not 
supported by IIP) 


176 


BO 




GENACB 




GENCB information to 
generate the ACB 


176 


BO 


4 


GACBHAD 




Address of header 


180 


B4 


4 


MACRFEAD 




Address of MACRF 
element 


184 


B8 


4 


FILENEAD 




Address of filename 
element 


188 


BC 




GACBH 




Header 


188 


BC 


1 


GACBBTC 


X'AO' 


Block-type code (ACB) 


189 


BD 


1 


GACBFTC 


x-or 


Function-type code 
(GENCB) 


190 


BE 


2 


GACBNOC 


x'ooor 


Number of copies 
(1 copy) 


192 


CO 


4 


GACBWAAD 




Address of work area 
set to 0; VSAM obtains 
space via GETVIS 


196 


C4 


4 


GACBWALN 


X'OO' 


Length of work area 



ACCESS METHOD DEFINE THE FILE (AMDTF) TABLE (....Cont'd) 



Displacement 


Bytes 


Field Name 


Hex 

Digit 


Description 


Dec 


Hex 


200 


C8 




AvAACRFEL 




MACRF element 


200 


C8 


4 


MACRFKTC 


X'OO 120000' 


Keyword-type code 


204 


CC 


4 


MACRFVAL 




Value supplied by 
IIPOPEN 


208 


DO 




FNAMEEL 




File name (DDname) 
element 


208 


DO 


4 


FNAMEKTC 


X'00090000' 


Keyword-type code 


212 


D4 


8 


FNAMEACB 




File name (inserted 
by IIPOPEN) 


220 


DC 




GENRPL 




GENCB information 
to generate the RPL 


220 


DC 


4 


GRPLHAD 




Address of header 


224 


EO 


4 


ARLNEAD 




Address of AREALEN 
element 


228 


E4 


4 


ACBEAD 




Address of ACB element 


232 


E8 


4 


KEYLNEAD 




Address of KEYLEN 
element 


236 


EC 


4 


RECLNEAD 




Address of RECLEN 
element 


240 


FO 




GRPLH 




Header 


240 


FO 


1 


GRPLBTC 


X'CO' 


Block-type code (RPL) 


241 


Fl 


1 


GRPLFTC 


x'or 


Function-type code 
(GENCB) 


242 


F2 


2 


GRPLNOC 


x'ooor 


Number of copies 
(1 copy) 


244 


F4 


4 


GRPLWAAD 




Address of work area 
set to 0; VSAM obtains 
space via GETVIS 


248 


F8 


4 


GRPLWALN 




Length of work area 
set to 


252 


FC 




ARLNEL 




AREALEN element 


252 


FC 


4 


ARLNKTC 


X'002DOOOO' 


Keyword-type code 


• 256 


100 


4 


ARLNVAL 




Area Length 


260 


104 




ACBEL 




ACB element 


260 


104 


4 


ACBKTC 


X'002B0000' 


Keyword-type code 


264 


108 


4 


ACBAD1 




Address of ACB 


268 


IOC 




KEYLNEL 




KEYLEN element 


268 


IOC 


4 


KEYLNKTC 


X'00300000' 


Keyword-type code 


272 


110 


4 


KEYLNVAL 




Key length 


276 


114 




RECLNEL 




RECORDLEN element 


276 


114 


4 


RECLNKTC 


X'00350000' 


Keyword-type code 


280 


118 


4 


RECLNVAL 




Record length 


284 


11C 




SHOWCB 




Information to show 
ACB or RPL 


284 


11C 


4 


SHHAD 




Address of header 


288 


120 


4 


SHEAD 




Address of element 


292 


124 




SHH 




Header 


292 


124 


1 


SHBTC 


X'OO' 


Block-type code 


293 


125 


1 


SHFTC 


X'03' 


Function-type code 
(SHOWCB) 


294 


126 


2 


SHOTC 


X'0000' 


Object-type code 


296 


128 


4 


SHBAD 




Address of block to be 
shown 



ACCESS METHOD DEFINE THE FILE (AMDTF) TABLE (....Cont'd) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 


300 


12C 


4 


SHARAD 




Address of area 


304 


130 


4 


SHARLN 


X'0004' 


Length of area 


308 


134 


4 


SHAR 


X'OO 


Area where information 
is to be placed 


312 


138 




SHEL 




Element 


312 


138 


4 


SHKTC 




Keyword-type code 
(set by IIP) 


316 


13C 




MODRPL 




MODCB information 
to modify the RPL 


316 


13C 


4 


MRPLHAD 




Address of header 


320 


140 


4 


OPTCDEAD 




Address of OPTCD element 


324 


144 


4 


AREAEAD 




Address of AREA element 


328 


148 


4 


ARGEAD 




Address of ARG element 


332 


14C 




MRPLH 




Header 


332 


14C 


1 


MRPLBTC 


X'CO' 


Block-type code (RPL) 


333 


14D 


1 


MRPLFTC 


X'02' 


Function-type code 
(MODCB) 


336 


150 


4 


MRPLBAD 




Address of block to be 
modified (supplied by 
IIPOPEN) 


340 


154 




OPTCDEL 




OPTCD element 


340 


154 


4 


OPTCDKTC 


X'00340000' 


Keyword-type code 


344 


158 


4 


OPTCDVAL 




Bit pattern (supplied by IIP) 


348 


15C 




AREAEL 




AREA element 


348 


15C 


4 


AREAKTC 


X'002C0000' 


Keyword -type code 


352 


160 


4 


AREAAD 




Address of area (supplied 
by IIP) 


356 


164 




ARGEL 




ARG element 


356 


164 


4 


ARGKTC 


X , 002E0000' 


Keyword -type code 


360 


168 


4 


ARGAD 




Address of ARG parameter 
(supplied by IIP) 


364 


16C 




MSGOUT 




Header 


364 


16C 


2 


MSCCB 




Residual count 


366 


16E 


2 






Communications bytes 


368 


170 


2 






CSW status bytes 


370 


172 


1 






Logical unit class 


371 


173 


1 






Logical unit 


372 


174 


1 






Zero 


373 


175 


3 






CCW address 


376 


178 


1 






Status byte 


377 


179 


3 






CSW CCW address 


380 


17C 


4 






Zeros 


384 


180 


8 


MSCCW 




CCW 


392 


188 


6 


ERRCDE 




Error code of message 


398 


18E 


5 


ISAMCM 




'ISAM' 


403 


193 


8 


ISCM 




ISAM command area 


412 


19C 


5 


VSAMCM 




'VSAM' 


417 


1A1 


8 


VCCM 




VSAM command area 


426 


1AA 


4 


CRCM 




•RC=' 


430 


1AE 


5 


CRC1 




Return code area 


435 


1B3 


20 


5HQWCBF 




Area if SHOWCB failed 


455 


1C7 


5 


CRC2 




Return code from SHOWCB 


460 


ICC 


4 


CRSCM 




'EC=' 


464 


1D0 


4 


CRSC 




Error code area 


468 


1D4 


1 


BRKT 




Closing bracket 



ADDRESS RANGE DEFINITION BLOCK (ARDB) 



Displacement- 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec Hex 




1 1 


1 

1 


ARDID 
ARDTYPE 


X'AD' 


Control block identifier 
Identifies the type of 
space defined by the 
ARDB: 






ARDKR 


X'80 1 


One key range of a key- 
range data set 






ARDHLI 


X'40' 


The total index of a 
key-sequenced data set 
that does not have the 
sequence set with the 
data, or 

The non-sequence set 
levels of a key- 
sequenced data set's 
index, when the 
sequence set is stored 
with the data 






ARDSS 


X'20 1 


The sequence set of a 
key-sequenced data 
set, when the sequence 
set is stored with data 






ARDUOVFL 


X'10' 


Use overflow volumes 
for this key 






ARDEOD 


X'08' 


End of data ARDB 






ARDLGCC 


X'04' 


Device contains more 
than 256 cylinders 


2 2 


2 


ARDLEN 


X'80' 


Length of the ARDB 


4 4 


1 


ARDPRF 




Address range definition 
preformat byte (this 
byte is a literal copy 
of the catalog byte 
called ITYPEXT) 






ARDPRFMT 


X'40' 


No preformat done 
indication 


5 5 


3 






Reserved 


8 8 


4 


ARDNPTR 




Address of the next 
ARDB in the ARDB 
chain 


12 C 


4 


ARDHRBA 




The RBA of the next 
free-space control 
interval at the end of 
the data set 


16 10 


4 


ARDEDBA 




Pointer to the active 
EDB 


20 14 


4 


ARDPREL 




Pointer to related ARDB 


24. 18 


4 


ARDERBA 




The RBA of the highest 
control interval 
allocated to the key 
range 



ADDRESS RANGE DEFINITION BLOCK (ARDB) (....Cont'd) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec Hex 


28 IC 
32 20 

36 24 


4 
4 

2 


ARDPKEYS 
ARDHKRBA 

ARDVOLNM 




Pointer to ARDKEYS 
The RBA of the data set 
control interval 
containing the key 
range's high-key value 
Number of volumes in 
list 


The following ten-byte entry, called an ARDB volume group, repeats for each volume 
in this ARDB. 


38 26 
38 26 

44 2C 

46 2E 

46 2E 

47 2F 

48 30 


10 
6 

2 

2 

1 
1 
Variable 


ARDVOLGP 
ARDVOLSR 

ARDRELRP 

ARDSYMU 
ARDSUCLS 
ARDSUNUM 
ARDKEYS 




Volume serial 
(VOLSER) list 
The serial number of the 
volume containing the 
highest RBA allocated 
to the key range 
Catalog relative 
replication number 
Symbolic unit 
Symbolic unit class 
Symbolic unit number 
Space reserved for the 
key range's low and 
high key values. The 
length of this field 
equals twice the key 
length 



BUFFER CONTROL BLOCK (BCB) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










4 


BUFNBCB 




Address of the next 
BCB entry 


4 


4 


4 


BUFCBAD 




Buffer address 


8 


8 


20 


BUFRIODR 




Read I/O driver block 


8 


8 


2 


BUFCURRU 
BUFCURU 




Read symbolic unit 

number 

Current logical unit 


10 


A 


2 


BUFBKSTR 




Number of physical 
blocks to read 


12 


C 


8 


BUFRSEEK 




Computed DASD 
address for read 


12 


C 


1 


BUFRM 




M 


13 


D 


2 


BUFRBB 




BB 


15 


F 


2 


BUFRCC 




CC 


17 


11 


2 


BUFRHH 




HH 


19 


13 


1 


BUFRR 




R 


20 


14 


4 


BUFCRRBA 




RBA for the read 


24 


18 


4 


BUFRLPMB 




Address of the read LPMB 


28 


1C 


20 


BUFWIODR 




Write i/O driver block 


28 


1C 


2 


BUFCURWU 




Write symbolic unit number 


30 


IE 


10 


BUFCKIN 




Write check initialize area 


30 


IE 


2 


BUFBKSTW 




Number of physical blocks 
to write 


32 


20 


8 


BUFWSEEK 




Computed DASD address 
for write 


32 


20 


1 


BUFWM 




M 


33 


21 


2 


BUF WBB 




BB 


35 


23 


2 


BUFWCC 




CC 


37 


25 


2 


BUFWHH 




HH 


39 


27 


1 


BUFWR 




R 


40 


28 


4 


BUFCWRBA 




RBA for the write 


44 


2C 


4 


BUFWLPMB 




Address of the write LPMB 


48 


30 


2 


BUFFLAG 
BUFFLAG1 




Flag bytes 
Flag byte 1: 








BUFCMW 


X'80' 


Write indicator 








BUFCFMT 


X'40' 


Format write indicator 








BUFCRRD 


X'20' 


Read indicator 








BUFRDAHD 


X'10' 


Read ahead request 








BUFPFMT 


X'08' 


Format remainder of control 
area 








BUFCVAL 


X'04' 


Buffer contents are valid 








BUFSSRCD 


X'02' 


Buffer is a sequence set 
record 








BUFRES1 


X'Ol' 


Available 








BUFFLAG2 




Flag byte 2 : 








BUFPURG1 


X'80' 


Purge - must write or read 








BUFPURG2 


X'40' 


Purge - format 








BUFRIXRD 


X'20' 


Replicated index read 



BUFFER CONTROL BLOCK (BCB) (. . . .Cont'd) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








BUFFREP 


X'08' 


Return buffer by REPBUF 








BUFWRINV 


X'10' 


Control Interval was 
written - another string 








BUFRES2 


X'07' 


Available 


50 


32 


10 


BUFBKTWI 




Write initialize area 


50 


32 


2 


BUFBKTCK 




Number of physical 
blocks to check 


52 


34 


8 


BUFWCKSK 




Computed DASD 
address for check (not 
used In release 1) 


52 


34 


1 


BUFCM 




M 


53 


35 


2 


BUFCBB 




BB 


55 


37 


2 


BUFCCC 




CC 


57 


39 


2 


BUFCHH 




HH 


59 


3B 


1 


BUFCR 




R 


60 


3C 


4 


BUFVCCHH 




CCHH for index read 


60 


3C 


4 


BUFVCCB 




CCB address 


64 


40 


1 


BUFERFLG 




I/O error indicator 






1 


BUFEIOER 


X'80' 


I/O error on buffer 






1 


BUFESRCH 


X'40' 


I/O error on search ID 






1 


BUFESEEK 


X'20' 


I/O error on seek 






1 


BUFEREAD 


X'10' 


I/O error on read 






1 


BUFEWRT 


X'08' 


I/O error on write 






1 


BUFERBCK 


X'04' 


1/ O error on readback 
check 






1 


BUFENTCM 


X'02' 


I/O operation complete 






1 


BUFEDSK 


X'01' 


2314 seek incorrect 


65 


41 


1 


BUFSTRID 




String ID of this set of 
buffers 


66 


42 


2 


BUFCNOl 




No. of blocks in control 
interval to process 


68 


44 


4 


BUFNABCB 




Next BCB in AMDSB chain 



BUFFER HEADER (BHD) 



Disp 


lacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










2 


BHDNO 




Number of buffers 


2 


2 


2 


BHDLEN 




Length of control block 


4 


4 


2 


BHDRMAX 




Maximum number of 
buffers available 


6 


6 


2 


BHDRMIN 




Minimum number of 
buffers available 


8 


8 


2 


BHDBRC 




Read-ahead count 


10 


A 


1 


BHDHFLAG 




Buffer header flag 1 








BHDRAHOK 


X'80' 


Read-ahead OK flag 








BHDIXREP 


X'40' 


Replicated index read 
indicator 








BHDNSKD 


X'08' 


I/O with wait for no- 
schedule queue 
(BCBNSKDQ) 








BHDSKD 


X'04' 


I/O with wait for 
schedule queue 
(BCBSKDQ) 








BHDMVBCB 


X'02' 


Free buffer is a move 


11 


B 


1 


BHDFLAG 




Buffer header flag 2 


12 


C 


4 






Reserved 


16 


10 


4 


BHD1STF 




Address of chain of 
free buffers 


20 


14 


4 


BHDSKDQ 




Address of BCB chain 
with I/O scheduled 


24 


18 


4 


BHDNSKDQ 




Address of BCB chain 
with pending I/O 


28 


1C 


4 


BHD1STW 




Address of first BCB 
requiring I/O 


32 


20 


1 


BHDID 


X'77' 


BHD identification 


33 


21 


1 






Reserved 


34 


22 


2 


BHDIOCNT 




I/O count of no-schedule 
queue (BCBNSKDQ) 


36 


24 


2 


BHDWMIN 




Write threshold 


38 


26 


2 


BHDTRACT 




Temporary read -ahead 
count 


40 


28 


2 


BHDQNO 




Number of BCBs on queues 


42 


2A 


2 






Reserved 


44 


2C 


4 


BHDCCHH 




CCHH of last held control 
area 


48 


30 


4 


BHDCCBCH 




CCB chain pointer 



CATALOG AUXILIARY WORK AREA (CAXWA) 





Offset 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 







1 




1 


1 
3 


CAXID 


Control Block identifier X."CA" 
Reserved 


4 


4 


4 


CAXCHN 


Address of the next CAXWA in the chain 


8 


8 


.i.. .... 

...i .... 
.... i... 
.... .1.. 

i. 

i 


CAXFLGS 

CAXBLD 

CAXOPN 

CAXCLS 

CAXEOV 

CAXCMP 

CAXMCT 

CAXCMR 

CAXSCR 


Flags: 

Build request 

The catalog is being opened, 

The catalog is being closed 

An end-of -volume routine is in control 

Open /Close/EOV processing is 

l=Master Catalog 

0=User catalog 

Catalog management has been called by 

a catalog management routine 

Reserved for OS 


9 


9 


.i 

..i 

...i .... 
.... i... 

i 


CAXFLG2 
CAXF2DT 
CAXF2NDD 
CAXF2CCR 

CAXF2CRA 
CAXF2REC 
CAXF2EOV 

CAXF2CA 


Flags: 

The catalog has been deleted 

No DD-name found 

0=CCR needs to be read 

1=CCR has been read 

CAXWA for CRA 

Recoverable catalog 

End of volume flag 

Reserved 

Free CAXWA if error 


10 


A 






Reserved 


11 


B 




CAXACT 


Catalog activity count 


12 


C 


4 


CAXATIOT 


Reserved for OS 


16 


10 


4 


CAXSCHWA 


Reserved for OS 


20 


14 


4 


CAXDRWP 


Address of the catalog's DRWA 


24 


18 


4 


CAXACB 
CAXCRACB 


Address of the catalog's ACB 
Address of CRA (ACB) 


28 


1C 


4 


CAXUCB 


Address of the COMREG 


32 


20 


12 


CAXCCR 


Catalog control record information 


32 


20 


3 


CAXHACI 


Catalog interval number of the highest 
allocated control interval in the catalog 


35 


23 


3 


CAXNFCI 


Control interval number of the next 
free control interval in the catalog 


38 


26 


3 


CAXCDC! 


Number of deleted control intervals 


41 


29 


3 


CAXFDCI 


Control interval number of the first 
deleted control interval in the catalog 


44 


2C 


2 




Reserved 


46 


2E 


2 


CAXRPLCT 


Number of RPLs associated with the 
CAXWA 


48 


30 


4 


CAXRPL 


Address of the first RPL in the CAXWA "s 
RPL chain 


52 


34 


44 


CAXCNAM 


Catalog name 


96 


60 


4 


CAXOPLST 


Open/Close paramater list : 


96 


60 


1 

1 

.XXX xxxx 


COPTS 
CENLST 


Option flags: 
End-of-list indicator 
Reserved 


97 


61 


3 


COPACB 


Address of the catalog's ACB 



CATALOG AUXILIARY WORK AREA (CAXWA) (. . .Continued) 



Offse 




Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






100 


64 


4 


CAXOPEWA 


Reserved for OS 


104 


68 


4 


CAXCCA 


Address of the CCA 


108 


6C 


4 


CAXJDE 


Reserved for OS 


" 112 


70 


4 


CAXCAT 


Address of the catalog's ACB 
associated with CRA 


115 


74 


6 


CAXVOLCR 


Volume serial of CRA volume 


112 


7A 


2 


CAXSYSCR 


SYS-number of CRA volume 


124 


7C 


6 


CAXVOLRM 


Volume Serial of REM volume 


130 


82 


2 


CAXSYSRM 


SYS-number of REM volume 


132 


84 


6 


CAXOCPAR 


O/C parameter list 


132 


84 


4 


CAXOCACB 


ACB address 


136 


88 


2 


CAXOCEOL 


End of list indicator 



CATALOG COMMUNICATIONS AREA (CCA) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec Hex 





2 


CCAID 


Identifier - set to X'ACCA' 


2 2 


2 


CCASZ 


Size 


4 4 


! 


CCACD1 


Return code 1 


5 5 


1 


CCACD2 


Return code 2 


6 6 


I 


CCAFLG1 


Flag byte 1: 




1 


CCAF1LPS 


Stop the loop 




.1 


CCAF1ARA 


Assign RPL to ARA 




..1 


CCAF1LRD 


Catalog control record read inro 
virtual storage 






CCAF1KEY 


Retrieve the catalog record based 
on a DSNAME value 




.... 1... 


CCAF1KGE 


Retrieve the next catalog record 




].. 


CCAF1CR 


A checkpoint of the CCR is required 




1. 


CCAF1UP 


GET macro instruction issued for 
update 




1 


CCAF1DK 


When the caller is renaming a data 
set, this flag indicates that the data 
set's true-name record is to be 
deleted, bur the data set's catalog 
record is not to be deleted. 


7 7 


1 


CCAFLG2 


Flag byte 2: 




1 


CCAF2SYS 


Always set on 




.1 


CCAF2NVC 


No validity check on the caller's 
CTGFL or work area is required 




..1 


CCAF2CCT 


Reserved for OS 




...1 .... 


CCAF2XEQ 


Exclusive enqueue 




...0 .... 




Shared enqueue 




.... 1... 


CCAF2RHS 


When a catalog management routine 
calls the VSAM Open routines to open 
a newly created catalog, and the Open 
routines call VSAM Catalog 
Management routines to obtain 
information about the catalog to be 
opened, the situation is called a 
"recursive call". The catalog cannot 
be dequeued when the Catalog 
Management routines return to the 
caller (VSAM Open routines). 




XX . 


CCAF2COB 


Combination of catalog open and build: 




1.. 


CCAF2CO 


Catalog is being opened 




1. 


CCAF2CB 


Reserved for OS 




.... ...1 


CCAF2SMO 


Search master catalog only 


8 .8 


1 


CCAFLG3 


Flag byte 3: 




1 


CCAEXGR1 


Exit indicator 




.1 


CCAGC4 


The catalog record contains a password 
group occurrence (identified by Group 
Code 4) (detected during IGGPSCNC 
processing) 




..1, .... 


CCAGDSP 


GENDSP 




...1 .... 


CCAEXGR2 


Exit indicator 



CATALOG COMMUNICATIONS AREA (CCA) (. . . .Cont'd) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec Hex 




.... 1... 


CCANF 


The group occurrence cannot be found 




1.. 


CCAELC2 


Exit indicator 




1. 


CCALFT 


First time 




1 


CCAEGREC 


Exit indicator 


9 9 


1 


CCAFLG4 


Flag byte 4: 




1 


CCAF4DRQ 


The catalog must be dequeued after 
the request completes 




.1 


CCAF4BYS 


Bypass the security verification 




..1 


CCAGVNC 


The required variable-length field is 
not completely contained in the record 
currently in the buffer 




...1 .... 


CCAGVNF 


The group occurrence identified by the 
caller-specified sequence number 
cannot be found 




.... 1... 


CCAGVNBS 


There is no buffer space available to 
contain an extension record 




1.. 


CCAGVEX 


Exit indicator 




1. 


CCAGVNE 


The field does not exist in the located 
group occurrence 




1 


CCATCOMP 


Test complete : all group occurrence 
pointers have been examined and all 
designated fields have been tesied 


10 A 


1 


CCAFLG5 


Flag byte 5: 




1. 


CCAMEX2 


Exit indicator 




.1 


CCAMEX 


Exit indicator 




..1 


CCAMEX1 


Exit indicator 




...1 .... 


CCAMODPA 


The catalog record's base record must 
be written (using IGGPPAD) into the 
catalog 




.... 1... 


CCATHIT 


Successful test : a group occurrence 
hcs be found that satisfies the test 
conditions 




1.. 


CCATEX 


Exit indicator 




1. 


CCATEX1 


Exit indicator 




I 


CCATEX2 


Exit indicator 


11 B 


1 


CCAFLG6 


Flag byte 6: 




1 


CCAMCODR 


The catalog must be dequeued when the 
request completes 




.1 


CCADELP 


A deleted group occurrence pointer 
was found 




..1 


CCAMNOSP 


The catalog record's free space isn't 
large enough to contain all the new 
catalog information during the group 
occurrence move operation 




...1 .... 


CCAINIT 


Insert switch for variable-length 
field being retrieved 




.... 1... 


CCASUPFD 


Suppress password field information 
during field retrieval 




1.. 


CCAREUSE 


The contents of the caller's record 
areas (buffers) can be used by 
IGGPEXT and IGGPMOD 



CATALOG COMMUNICATIONS AREA (CCA) (. . . .Cont'd) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec 


Hex 






1. 


CCAEXT 


Set when a catalog management 
routine calls the Extract routine 
(IGGPEXT) 






1 


CCAMOD 


Set when a catalog management 
routine calls the Modify routine 
(IGGPMOD) 


12 


C 


4 


CCALBCYL 


Address of the label cylinder area 


16 


10 


4 


CCADPL 


Address of the DADSM parameter list 


20 


14 


4 


CCACPL 


Address of the caller's CTGPL 


24 


18 


4 


CCAACB 


Address of the catalog's ACB 


28 


1C 


4 


CCANPCCB 


Address of next PCCB 


32 


20 


4 


CCAURAB 


Address of the record area block 
(RAB) currently in use 


36 


24 


44 


CCASRCH 


Search argument (DSNAME of a 
cluster, data, index, catalog, or non 
VSAM data set, or a volume serial 
number) 


36 


24 


3 


CCASRID 


Control interval number 






3 


CCASRCIN 


Control interval number 


80 


50 


20 


CCARAB0 


Record Area Block : Each record 
area block describes the catalog 
record contained in one of the six 
catalog management buffers available 
for the request. RABs 1 through 5 are 
identical in format to RAB 0. 
Note : "x" in each field name is 
replaced by "0" through "5" to 
indicate a particular RAB's field. 


80 


50 


1 

1 

.1 

..1 

...1 .... 

.... 1... 

XX . 

1 


CCARxFLG 

CCARxUR 
CCARxUl 

CCARxU2 
CCARxWR 

CCARxPA 
CCARxUPD 


Flags: 

The following flag is used by IGGPEXT 

and IGGPMOD: 

The RAB is in use. It cannot be used by 

IGGPEXT or IGGPMOD 

The RAB is temporarily in use by 

IGGPEXT or IGGPMOD. It cannot be 

overlaid 

(Same as CCARxUl) 

The buffer must be written before 

another catalog record can be read 

into it 

The buffer contains a new catalog 

record - PUT-add is required to add 

the record to the catalog 

Reserved 

Update buffer not reused 


81 


51 


1 


CCARxRPL 


Last assign, RPL index 


82 


52 


2 




Reserved 


84 


54 


4 


CCARxREC 


Address of the record in the buffer 


88 


58 


12 


CCARxSEG 


Addresses of segments 



CATALOG COMMUN ICATIONS AREA (CCA) ( . . . Cont 'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






88 


58 


4 


CCACPE2x 


Address of the first byte after the 
fixed-length header fields 


92 


5C- 


4 


CCACPE3x 


Address of the first group occurrence 


96 


60 


4 


CCACPE4x 


Address of the first free-space byte 
in the record 


100 


64 


20 


CCARAB1 


Record Area Block 1 (See RAB 
description) 


120 


78 


20 


CCARAB2 


Record Area Block 2 (See RAB 
description) 


140 


8C 


20 


CCARAB3 


Record Area Block 3 (See RAB 
description) 


160 


A0 


20 


CCARAB4 


Record Area Block 4 (See RAB 
description) 


180 


B4 


20 


CCARAB5 


Record Area Block 5 (See RAB 
description) 


200 


C8 


1 


CCARPLK 


Assigned RPL count 


201 


C9 


1 


CCARPLF 


Index to RPL found 


202 


CA 


1 


CCARPLX 


Work byte for ARPL, RPLM 


203 


CB 


1 


CCARPLT 


Work byte for ARPL, RPLM 


204 


CC 


6 


CCARPLAA 


Indices to assigned RPLs 


210 


D2 


2 




Reserved 


212 


D4 


4 


CCARPL1 


Address of the RPL in use 


216 


D8 


44 


CCADESA 


Save area for the extent Information 
returned by VSAM DADSM and 
Catalog Management : Subal locate 


216 


D8 


1 


CCANDEXT 


Number of extents 


217 


D9 


1 


CCAIXEXT 


Extent index value 


218 


DA 


2 


CCASSVOL 


Sequence number of the data set 
directory entry in the volume catalog 
record 


220 


DC 


128 


CCAEXTDE 


Sixteen 8-byte extent descriptors : 


220 


DC 


2 


CCAEXTSS 


Sequence number of the Data Space 
group occurrence that this extent's 
space is a part of 


222 


DE 


4 


CCAEXTAD 


The extent's starting physical address : 


222 


DE 


2 


CCAEXTCC 


Cylinder number CC 


224 


E0 


2 


CCAEXTHH 


Head number HH 


226 


E2 


2 


CCAEXTTH 


Number of tracks in the extent 


348 


15C 


1 


CCAASCIK 


Number of control intervals required 
to satisfy the caller's request 


349 


15D 


1 


CCACRRP 


RPL used for reading CCR 


350 


15E 


1 


CCAASCIX 


Used by the ASSIGN functions - points 
to the element in CCAASCI currently 
being processed 


351 


15F 


1 


CCASRPLX 


Saved RPL flags 


352 


160 


9 


CCAASCI 


Number of each assigned control 
interval 


361 


169 


3 


CCAUPGD 


Control interval for UPG modification 


364 


16C 


16 


CCAEQDQ 


Enqueue/ Dequeue parameter list 


364 


16C 


1 


CCAEDXFF 


End of parameter list, indicator byte 
=X'FF' 


365 


16D 


1 


CCAEDRLN 


Length of minor name 



CATALOG COMMUNICATIONS AREA (CCA) 



.Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






366 


16E 


1 

1 

.1 

. . XX xxxx 


CCAEDOPT 
CCAEDSHR 
CCARLSEB 


Enqueue/Dequeue Options 
l=Shared, 0=Exlusive 
Release control bit 
Other options (set by macro) 


367 


16F 


1 


CCAEDRCD 


Enqueue/Dequeue return code 


368 


170 


4 


CCARTSAV 


Save area for CCAMLRET 


372 


174 


4 


CCACOMRG 


COMRG pointer 


376 


178 


4 


CCAEDUCB 


Work area 


380 


17C 


4 


CCAMLRET 


Address of the caller's save area 
used by IGG0CLAG 


384 


180 


12 


CCAMSSPL 


GETVIS/FREEVIS parameter list area 


384 


180 


4 


CCAMNLEN 


-Number of bytes to process 


388 


184 


4 


CCAMNPTR 


Address of the return address 


392 


188 


1 




Reserved for OS 


393 


189 


1 


CCAMNSPL 


Reserved for OS 


394 


18A 


2 




Reserved for OS 


396 


18C 


4 


CCARPRM 


Return parameters 


400 


190 


8 


CCA CMS 


Catalog management Services work area 


400 


190 


4 


CCACMSWA 


Address of the CMS calling routine's 
work area 


404 


194 


4 


CCAEXCMS 


Address of a secondary CMS work area 


The following \ 


ields are set 


and used by IGG 


PLOC, IGGPEXT, and IGGPTSTS, 


and catalog ma 


nagement su 


functions which t 


hese procedure call : 


408 


198 


4 


CCALUME 


Address of a selected group occurrence 


412 


19C 


4 


CCACPE51 


(Same as CCACPE5) 


416 


1A0 


4 


CCACPE52 


(Same as CCACPE5) 


420 


1A4 


4 


CCACPE53 


(Same as CCACPE5) 


424 


1A8 


4 


CCACPE6 


Address of a selected group occurrence 


428 


1AC 


4 


CCACPE61 
CCARABSE 


(Same as CCAPE6) 

Save extract caller URAB 


432 


1B0 


4 


CCACPE7 
CCA 1 DPT 


Address of field value 
Insert data address 


436 


1B4 


4 


CCACPE71 


Alternate address to field value 


440 


188 


2 


CCAGOPLN 


Length of the group occurrence pointer . 


442 


1BA 


2 


CCASL 


Number of bytes for the sequence number 


444 


1BC 


4 


CCAILNG 


Length of the selected retrieved field 


448 


1C0 


4 


CCAFLPT 
CCATFLPT 


Address of the requested-field CTGFL 
Address of the CTGFL-for-tests 


452 


1C4 


4 


CCARABPT 


Address of the record area block 


456 


1C8 


4 


CCADICT 


Dictionary information to describe the 
field, based on its field name 


460 


ICC 


4 


CCAXCPL 
CCAMCPL 


Address of the CTGPL built when 
IGGPEXT and IGGPMOD are called, so 
that information in the caller's CTGPL 
is not altered 


464 


1D0 


4 


CCARABB 


Address of the RAB that identifies the 
base catalog record 


468 


1D4 


4 


CCARABF 


Address of the RAB that identifies the 
first record area (buffer) that can be used 
by IGGPEXT or IGG°MOD 



CATALOG COMMUNICATIONS AREA (CCA) (...Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






472 


1D8 


4 


CCARABL 


Address of the RAB that identifies the 
last record area (buffer) that can be used 
by IGGPEXT or IGGPMOD 


476 


IDC 


3 


CCACBASE 


The control interval number of the base 
catalog record 


479 


IDF 


1 


CCAGC 


Group code of the requested group 
occurrence 


480 


1E0 


2 


CCALREL 
CCALREL1 


Relative repetition number of a selecte 
group occurrence 


482 


1E2 


2 


CCASN 
CCASN1 


Sequence number of a selected group 
occurrence 


484 


1E4 


.1.! .... 

.... 1... 
1.. 

1. 

1 


CCAFLG8 

CCARPUT 

CCALSTC 

CCAEXTCR 

CCABLDCR 

CCASPUCO 

CCASCAX 

CCAUPG 
CCABUF 


CRA flags 

Inhibit CRA PUT 

List cat request 

Extend CRA in process 

Open request for CRA build 

Special UCAT 

1=CRA CAXWA search; 

0= UCAT CAXWA search 

1 -upgrade ; 0=no upgrade 

Output buffering flag 


485 


1E5 


.1 

..1 

... X xxxx 


CCAFLGA 
CCAUPGRR 
CCARGET 

CCALBFUT 


More flags 

RAB1 to be restored by upgrade module 

Get record for compare before update 

CRA 

l=Multiple file parameter search at define 

Reserved 


486 


1E6 


2 


CCAIXFPL 


Index to the current CTGFL being 
processed 


488 


1E8 


2 


CCAIXREL 


Index for CCATREL 


490 


1EA 


2 


CCATNREL 


The sequence number of the next group 
occurrence to perform tests against if 
CCATREL is full or if there are no buffers 
available to contain the catalog record's 
next extension 


492 


1EC 


2 


CCATNUM 


Number of successful relative repetition 
numbers (cannot exceed 16) 


494 


1EE 


32 


CCATREL 


Successful relative repetition numbers 


526 


20E 


2 


CCATNO 


Total number of successful relative 
repetition numbers (might exceed 16) 


528 


210 


4 


CCATEST 


Address of the test CTGFL 


532 


214 


20 


CCARBA 


Work area for extent descriptors 


532 


214 


2 


CCASS 


Sequence number of the Data Space 
group occurrence that contains the extent 


534 


216 


4 


CCACCHH1 


Physical address -CCHH - of the extent's 
first track 


538 


21A 


4 


CCACCHH2 


Physical address -CCHH - of the extent's 
last track 


542 


21E 


2 


CCATT 


Number of tracks in the extent 


544 


220 


4 


CCARBA1 


Low relative byte address (RBA) 


548 


224 


4 


CCARBA2 


High relative byte address (RBA) 



CATALOG COMMUNICATIONS AREA (CCA) (...Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






552 


228 


2 


CCATLNG 
CCATLEN 


Total length of the extent information 
that has been processed (CCATLNG) ; 
total length of the scanned field so far 
(CCATLEN) 


554 


22A 


2 


CCARBAL 


RBA extent balance 


556 


22C 


2 


CCACNIX 


Combination name index 


558 


22E 


2 


CCAREASN 


Reason code 


560 


230 


4 


CCAIDPT2 


Address of the available space in the 
caller's work area or of the caller- 
supplied update information 


564 


234 


4 


CCAIDPT3 
CCARABSM 


Address of the length-field of a 
variable length field in the user's 
return area 


568 


238 


2 


CCAGVCT 


Number of group occurrence pointers 
processed so far 


570 


23A 


2 


CCANEVV 


If the requested variable-length field is 
non-extent, this field is set to binary zero 


572 


23C 


3 


CCAGVEXT 


Control interval number of the record's 
next extension record (not yet in a buffer) 


575 


23F 


1 


CCANEFV 


If the requested fixed-length field is 
non-extent, this byte is set to X"FF". 


576 


240 


1 




Reserved 


577 


241 


1 


CCAGRGC 


Group code of the requested group 
occurrence 


578 


242 


2 


CCAGRHI 
CCAGRH 1 1 


High relative repetition number 


580 


244 


2 


CCAIXTPL 


Index to test FPL 


582 


246 


2 


CCADLEN 


Number of bytes to be deleted from the 
catalog record 


584 


248 


2 


CCADIFF 


The difference between the insert length 
and the delete length (can be a negative 
number) 


586 


24A 


2 


CCAREPCT 


Number of relative repetition numbers 
processed so far 


588 


24C 


2 


CCADISP 


Displacement into variable-length field to 
the delete/ insert location 


590 


24E 


3 


CCASVCI 


Save area for the control interval number 
of the base catalog record 


593 


251 


3 


CCASVCI1 


Save area for the control interval number 


596 


254 


4 


CCADTA 


Address of the dictionary 


600 


258 


4 


CCACDTA 


Address of the index combination table 


604 


25C 


2 


CCADTCT 


Number of dictionary entries 


606 


25E 


2 


CCACDTCT 


Number of index combination entries 


608 


260 


4 


CCACWAP 


Controller work area 


612 


264 


4 


CCAMNADR 


Address of the virtual storage obtained by 
a GETVIS request 


616 


268 


4 


CCAILNG3 


Save area for the insertion length 


620 


26C 


4 


CCAILNG2 


Length of the user-supplied insert data 


624 


270 


4 


CCAALPTR 


Address of the space management work 


628 


274 


4 




Reserved 



CATALOG COMMUNICATIONS AREA (CCA) (...Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






632 


278 


4 


CCALCPL 


Reserved for OS 


636 


27C 


.1 

..1 

.... .\.. 

1. 

1 


CCAFLG7 

CCALSP 

CCANRLSE 

CCACKDEL 

CCASMPBR 

CCAONCE 

CCAROREO 

CCAFEOV 

CCAEQOPN 


Flags: 

Reserved for OS 

Release Control Bit 

Delete switch 

Do GET for base record 

Move only one occurrence 

Read only request 

Force EOV 

Enqueued on SYSOPEN 


637 


27D 


3 


CCARCI 


CRA Record control interval number 


640 


280 


4 


CCALABSV 


Saved address of IKOLAB area 


644 


284 


4 


CCARABSV 


Saved address of RAB 


648 


288 


2 


CCAMODUL 


Module name 


650 


28A 


3 


CCACHAIN 


Control interval number save area 


653 


28D 


3 


CCACI1 


Control interval number save are 


656 


290 


3 


CCACI2 


(Same as CCACIl) 


659 


293 


3 


CCACI3 


(Same as CCACIl) 


662 


296 


2 


CCAVARLN 


Number of bytes to be inserted into 
the record 


664 


298 


4 


CCARRAB 


Address of the RAB containing the 
group occurrence pointers where 
delete/insert processing is to begin 


668 


29C 


4 


CCARBASE 


(Same as CCARRAB) 


672 


2A0 


4 


CCAVARPT 


Address of the information to be 
inserted into the record 


676 


2A4 


2 


CCADELN 


Number of bytes to be deleted from 
the record 


678 


2A6 


20 


CCAVAR 


Insert information save area 


698 


2BA 


20 


CCAVAR1 


(Same as CCAVAR) 


718 


2CE 


3 


CCADEL1 


The control interval number of the first 
record in a series of records to be 
deleted 


721 


2D1 


3 


CCADEL2 


The control interval number of the last 
record in a series of records to be 
deleted 


724 


2D4 


40 


CCAXLATE 


Translation work area 


764 


2FC 


4 


CCAR14S 
CCABMINP 


Register 14 save area 
Input parameters 


768 


300 


2 


CCABMTRK 


Starting track 


770 


302 


2 


CCABMLIM 


Check limit, nn for set 


772 


304 


2 


CCABMMIN 


Conditional check minimum 


774 


306 


.1 

..1 

XXX 


CCABMFLG 

CCABMST 

CCABMCHK 

CCABMSET 

CCABMCCK 

CCABMLST 


State and function code 
State to set condition check 
ON -Perform check 
ON-Perform set 
ON-Perform condition check 
ON -Last set request (write) 
Reserved 


775 


307 




CCABMOUT 


Reserved 

Output parameters 


776 


308 


2 


CCABMONN 


Track number 


778 


30A 


2 


CCABMOTR 


Starting track 



CATALOG COMMUN ICATlONS AREA (CCA) (... Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






780 


30C 


1 

1 

.XXX xxxx 


CCAMOFG 
CCABMOST 


Output flags 
State of bits 
Reserved 


781 


SOD 


6 


CCAVOLCR 


CRA volume identification 


787 


313 


1 


CCABMPAD 


Padding character 


788 


314 


4 


CCABMGOP 


Current bit mask GOP 


792 


318 


4 


CCABMPTR 


Address of current. bit mask byte 


796 


31C 


4 


CCABMEND 


End of current bit mask 


800 


320 


2 


CCABMBT1 


Bit count, first byte 


802 


322 


2 


CCABMBTL 


Bit count, last byte 


804 


324 


2 


CCABMBYT 


Number of full bytes 


806 


326 


2 


CCABMSTR 


Current bit mask, start track 


808 


328 


4 


CCABMWK1 


Work field 


812 


32C 


4 


CCABMWK2 


Work field 


816 


330 


4 


CCABMWK3 


Work field 


820 


334 


4 


CCABMWK4 


Work field 


824 


338 


4 


CCABMRB1 


Address of first bit map RAB 


828 


33C 


4 


CCABMRB2 


Address of second RAB 


832 


340 


4 


CCACARWA 


Address of CRA definition work area 


836 


344 


4 


CCACRABF 


Address of CRA buffer 


840 


348 


4 


CCASACB 


Address of saved CCA, ACB field 


844 


34C 


4 


CCAEXC 


Save address for CCA ACB 


848 


350 


4 


CCASR^L 


Address of saved CCA, RPL field 


852 


354 


4 


CCAADBUF 


Address of cluster record buffer, cluster 
record saved until CRA volume known 


856 


358 


4 


CCASCAXS 


Address of search argument for CAXWA 
chain search 


860 


35C 


4 


CCASCAXA 


Address of found CAXWA 


864 


360 


4 


CCADEVT 


CRA volume device type 


868 


364 


8 


CCANMF1 


Name field of variable open resource 


876 


36C 


8 


CCANMF2 


Name field of variable open resource 


884 


374 


8 


CCANMF3 


Name field of variable open resource 


The following tv 


vo fields are 


used by the no-u 


jgrade/upgrade function, called by 


ALTER, 


DEFINE 


or DELETE 






892 


37C 


3 


CCAXDCI 


AIX data control interval number 


895 


37F 


3 


CCAXICI 


AIX index control interval number 


898 


382 


1 


CCACATIN 


CLAH indicator 


899 


383 


1 




Reserved 


900 


384 


4 


CCACOPTR 


CLCO work area 


904 


388 


4 


CCADEVA 


Address of device character return area 


908 


38C 


4 


CCAFARE 


Address of file identification 


912 


390 


4 


CCAAREA 


Pointer to address of label record area 


916 


394 


2 


CCAMDSAV 


Save area for CCA module 


918 


396 


2 


CCARSSAV 


Save area for CCA 


920 


398 


40 


CCATEMPS 


Temporary area for PLS 


960 


3C0 


348 


CCAREGS 


Save area for registers 


960 


3C0 


4 




Address of user save area 


964 


3C4 


8 


CCAMODNM 
CCAEND 


Load module name 

End CCA j 



CONTROL INTERVAL WORK AREA (CIW) 



Offset 
Dec Hex 


Bytes and 

Bit Pattern 


Field Name 


Description 


Register Save Area for IKOCIS 




4 4 
8 8 
12 C 
16 10 
20 14 
24 18 


48 
4 
4 
4 
4 
4 
4 
4 


CIWAVE 

CIWAVR14 

CIWAVR15 

CIWAVR0 

CIWAVR1 

CIWAVR2 

CIWAVR3 

CIWLNGTH 


Register save area (12 Reg.) 
Register 14 
Register 15 
Register 

Register 1, RDF shift count on entry 
Register 2, RDF modification offset 
Register 3, RDF data work area 
Length of work area 


Space Manager Save Area 


52 34 
56 38 
60 3C 


4 
4 
4 


CIWSPA14 
CIWSPA15 
CIWSPA03 


Register 14 
Register 15 
Register 3 


IKQPFO Work Area 


64 40 
68 44 
72 48 
76 4C 
80 50 
84 54 
88 58 
92 5C 


4 
4 
4 
4 
4 
4 
4 
2 


CIWPF014 

CiWPFOOO 

CIWPFO01 

CIWPFO02 

CIWPFO03 

CIWPFO04 

CIWACB 

CIWSVC 


Register 14 

Register 

Register 1 

Register 2 

Register 3 

Register 4 

ACB pointer for TCLOSE call 

SVC2 in TCLOSE call list 


IKQRRP Work Area 
The work area for IKQRRP overlays the work area for IKQPFO 


64 40 
68 44 
72 48 
76 4C 
80 50 
84 54 
88 58 
92 5C 


4 
4 
4 
4 
4 
4 
4 
2 


CIWRRP14 

CIWRRP00 

CIWRRP01 

CIWRRP02 

CIWRRP03 

CIWRRBA 

CIWRRPLN 

CiWRSEOF 


Register 14 

Register 

Register 1 

Register 2 

Register 3 

Beginning of RBA in extent 

Preformat length 

SEOF indicator 


IKQNCA Work Area 


96 60 
100 64 
104 68 
108 6C 

112 70 
116 74 
120 78 


4 
4 
4 
4 

4 
4 
4 


CIWNEW14 
CIWNEW01 
CIWNEW03 
CIWCARBA 

CIWCIRBA 
CIWNXRBA 
CIWDARDBB 


Register 14 

Register 1 

Register 3 

Low RBA of data control crea 

(new control area) 

Index RBA of old sequence set record 

Index RBA of new sequence set record 



CONTROL INTERVAL WORK AREA (CIW) (. 


. .Continued) 












Offset 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






IKQCAS Work Area 


124 


7C 


4 


CIWCAS14 


Register 14 


128 


80 


4 


CIWCAS03 


Register 3 


132 


84 


4 


CIWHINEW 


High section of new control area 


136 


88 


4 


CIWSPTR 


Pointer save section 


140 


8C 


4 


CIWHIOLD 


High section of old control area 


144 


90 


4 


CIWEPTR 


Entry pointer 


148 


94 


4 


CIWAKEY 


Address of key save area 


152 


98 


2 


CIWEINC 


Entry increment bytes 


154 


9A 


2 


CIWSRR 


Offset of last section from the high 
section of the new control area 


156 


9C 


4 


CIWXBUFA 


Address of new index buffer 


Offset 


Bytes 


Field Name 


Hex 


. Description 


Dec 


Hex 






Digit 








IKQCIR Work Area 








Control Interval Space Reel 


amotion Work Area 


The wcrk 


area fo 


r IKQCIR overlays the work a 


reas for IKQNCA and IKQCAS 


96 


60 


4 


CIWCIR14 




Register 14 


100 


64 


4 


CIWCIR09 




Register 9 


104 


68 


4 


CIWCIR03 




Register 3 


108 


6C 


4 


CIWSAVP 




Free data of pointer save 
for control interval 


112 


•70 


1 


CIWCIRSW 




Switch byte 








CIWNEXT 


X'80' 


Position to next entry index 








CIWSPAN 


X'40' 


Spanned entry index 








CIWRECL 


X'20' 


Space reclamation index 








CIWNOSPL 


X'10' 


No control area split 
indicator 








CIWXWRT 


X'08' 


Write index indicator 






3 






Reserved 


113 


71 


12 


CIWLASMD 




IKQLASMD parameter list 


116 


74 


1 


CIWLID 




Request type 








CIWLTST 


X'04' 


Test request 


117 


75 


7 


CIWLDSID 




Data set identification 


117 


75 


3 


CIWLDSCI 




Control interval number 


120 


78 


4 


CIWLACB 




Pointer to catalog ACB 


124 


7C 


1 


CIWLSOPT 




Share option 


125 


7D 


1 


CIWLFLG 




Flag byte 








CIWLIN 


X'80' 


Input indicator 


126 


7E 


2 


CIWLOUT 




Output count 


128 


80 


8 


CIWRES 




Resource name field 



CONTROL-INTERVAL WORK AREA (CIW) (-. . .Continued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




IKQCIS Work Area 


160 


A0 


32 


CIWCIWA 




Copy of PLH work area 


192 


CO 


4 


CIWRCDCT 




Record count save for move 


196 


C4 


4 


CIWMODPT 




Pointer to modification point 


200 


C8 


4 


CiWFPTR 




Next address 


204 


CC 


4 


CIWFRDF 




Next RDF 


208 


DO 


4 


CIWTCIL 




Total data length of control 
interval 


212 


D4 


4 


CIWCLNUP 




R3A of control interval 
requires an update 


216 


D8 


4 


CIWDCRDB 




Save of current ARD3 
pointer 


220 


DC 


4 


CIWNIRBA 




RBA of new sequence set 


225 


E0 


2 


CIWOLDCT 




Save of RDF count 


226 


E2 


1 


CIWFLAGS 




Flags 








CIWNTWO 


X'80' 


Two control intervals are 
needed for this split 








CIWNCAS 


X'40' 


Control area split needed 
to continue 








CIWCASDN 


X'20' 


Control area split has been 
executed 








CIWUHKR 


X'10' 


ARDHKRBA requires update 








CIWCLN 


X'08' 


Control intervals written 
require clearing 








CIWCIR 


X'04' 


Space reclamation executed 






IKQIXE En 


try Stack 






228 


E4 


4 


CIWENTRY 




Index entry data stack 


228 


E4 


12 


CIWENT1 






228 


E4 


4 


CIWRBA1 




RBA to be put in entry 


232 


E8 


4 


CIWKADD1 




Address of key 


236 


EC 


2 


CIWKL1 




Length of key 


238 


EE 


1 


CIWFLG1 




Flag byte 








CIWENTOK 


X'81' 


Two bits are used as indicator 








CIWINC 


X'40' 


Index record in core 








CIWSPLIT 


X'20' 


Split entry to be done 








CIWNOIO 


X'10' 


No execution of input/ 
output yet 


239 


EF 


1 


CIWIXLV1 




Index level 


240 


F0 


12 


CIWENT2 




Second stack position 


240 


F0 


4 


CIWRBA2 




RBA 


244 


F4 


4 


CIWKADD2 




Key pointer 


248 


F8 


2 


CIWKL2 




Key length 


250 


FA 


1 


CIWFLG2 






251 


FB 


1 


CIWIXLV2 




Index level 


252 


FC 




CIWSTKND 




End of stack 


252 


FC 


4 


CIWEKEYA 




Address of index enter key 



CONTROL INTERVAL WORK AREA (CIW) (. . .Continued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Scratch Buffer Parameter List 


256 


100 


20 


CIWDCNV 




Scratch CI descriptor 


256 


100 


4 


CIWDRBA 




Scratch control interval 
RBA 


260 


104 


8 


CIWDBUF 




Buffer parameter list 


260 


104 


4 


CIWDBCB 




Address of control block 


264 


108 


4 


CIWDBAD 




Address of buffers 


268 


10C 


4 


CIWDCIDF 




CIDF descriptor 


268 


10C 


2 


CIWDFSO 




Free space offset 


270 


10E 


2 


CIWDFSL 




Free space length 


272 


110 


1 


CIWDSW 




Switch byte 


273 


111 


1 






Reserved 


274 


112 


2 


CIWDCSZ 




Length of buffer - 10 


IKQIXE Work Area 


276 


114 


4 


CIWIXEBA 




Caller base save 


280 


118 


4 


CIWIXERT 




Return register save 


284 


11C 


4 


CIWIXER0 




Save GETVIS length 


288 


120 


4 


CIWIXER1 




Save GETVIS address 






Work Area for Linkage from 


IKQCIS to IKQCAS 


292 


124 


4 






Reserved 


296 


128 


4 


CIWCR8 




Register save for linkage 
return 






AMDSB Save Area for Upda 


tes to AMDSB Control Fields 


300 


12C 


4 


CSXHLRBA 


AMDHLRBA index 


304 


130 


2 


CSXNIL 


AMDNIL index 


IXFORMAT Work Space 


308 


134 


4 


CIWIXFBA 




Save callers base 


312 


138 


4 


CIWIXFRT 




Save return register 


316 


13C 


4 


CIWLSEP 




Entry pointer for last 
section 


320 


140 


4 


CIWANLSE 




Entry address for last 
section 


324 


144 


4 


CIWANLE 




Last entry address 


328 


148 


2 


CIWKEYL 




Length of current key 


330 


14A 


2 


CIWNLSEL 




Length of last section key 


332 


14C 


2 


CIWNLEL 




Length of last entry key 


336 


150 


4 


CIWXNSA 




Address of next section 


340 


154 


4 


CIWXSOP 




Offset pointer of last 
section 


344 


158 


2 


CIWFCNT 




Format count 


346 


15A 


2 


CIWCINL 




Control entry length 


Thefollov 


ving fie 


d must be of the same length 


as PLHWAREA 


348 


15C 


44 | CIWAREA | 


j Work area for RDF build 



CATALOG PARAMETER USTJCTGPL) 



Displacement 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 









1 


CTGOPTN1 


First option indicator : 




1, 


CTGBYPSS 


Bypass the catalog management 
security verification processing 




.1 


CTGMAST 


Check the master password 




..1 


CTGCI. 


Check the control interval password 




...1 .... 


CTGUPD 


Check the update password 




.... 1... 


CTGREAD 


Check the read password 




1.. 


CTGNAME 


The CTGENT field contains the address 
of a 44-byte DSNAME, or a 6-byte 
volume serial number (padded with 
binary 0's) 




0.. 




The CTGENT field contains the 
address of a 3-byte control interval 
number 




1. 


CTGCNAME 


The CTGCAT field contains the 
address of a 44-byte catalog DSNAME 




0. 




The CTGCAT field contains the 
address of a VSAM catalog's ACB 




x 




Reserved 


1 1 


1 


CTGOPTN2 


Second option indicator : 




1 


CTGEXT 


Extend option (with UPDATE) 




.1 


CTGERASE 


Erase option (with DELETE) 






CTGSMF 


Reserved for OS 






CTGREL 


Release (with UPDATE) 




..1 


CTGPURG 


Purge option (with DELETE) 






CTGVMNT 


Volume mount caller 




...1 


CTGGTNXT 


Get-next option (with LISTCAT) 






CTGDISC 


Disconnect option (with DELETE) 






CTGOVRID 


Erase override option (with DELETE) 




1. 


CTGSCR 


Scratch space option (with DELETE) 




x 




Reserved 


2 2 




CTGOPTN3 


Third option indicator : 




XX x 


CTGFUNC 


Specifies the caller-requested function : 




001 




LOCATE 




on 




UPDATE 




100 




A Catalog Management Services 
function (see CTGOPTNS) 




...l .... 


CTGSUPLT 


Reserved for OS 




x . . . 




Reserved 






CTGSRH 


Reserved for OS 




1. 


CTGNUM 


Reserved for OS 




1 


CTGAMO 


VSAM request versus non VSAM 


3 3 




CTGOPTN4 


Reserved for OS 


4 4 


4 


CTGENT 


Address of the catalog record identifier, 
as defines in CTGOPTN1 






CTGFVT 


Address of the caller's CTGFV 


8 8 


4 


CTGCAT 


Address of the catalog's DSNAME or 
ACB, as specified in CTGOPTN1 


12 C 


4 


CTGWKA 


Address of the caller's work area 



CATALOG PARAMETER LIST (CTGPL) (.. .Continued) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






16 


10 


2 

0000 1... 

0001 0... 
0001 1... 
0010 0... 


CTGOPTNS 


Catalog Management Services 

request options : 

DEFINE 

ALTER 

DELETE 

LISTCAT 

Reserved 


17 


11 


1 

1 

.1 


CTGCRFLG 
CTGLBCYL 

CTGCTRBL 


CRA open flags 

Label cylinder information is passed 

for CRA 

Control blocks are passed for CRA 

Reserved 


18 


12 


1 


CTGTYPE 


Type of catalog record 






CD' 


CTGTDATA 


Data 






CI' 


CTGINDX 


Index 






C'A' 


CTGALIN 


Non-VSAM 






CU' 


CTGTUCAT 


User catalog 






CV 


CTGTVOL 


Volume 






C'C 


CTGTCL 


Cluster 






CM' 


CTGTMCAT 


Master catalog 






C'G' 


CTGTAIX 


Alternate index 






C'R* 


CTGTPTH 


Path 






C'Y' 


CTGTUPG 


Upgrade set 


19 


13 


1 


CTGNOFLD 


Number of entries contained in 
CTGFIELD 


20 


14 


4 


CTGDDNM 
CTGNEWMN 


Address of the DLBL statement ; if one 
is associated with this request 
Address of the new DSNAME ; if the 
request is being changed 


24 


18 


4 


CTGPSWD 


Address of the caller-supplied 
password 


28 


1C 


4 


CTGDDUC 


Address of UCAT file name 


32 


20 


4 


CTGDDCR 


Address of CRA file name 


36 


24 


4 


CTGFIELD 


Field pointers 



DEFINE THE FILE INDEXED SEQUENTIAL (DTFIS) TABLE 





Displacement 


Bytes and 
Alignment 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








16 


DTFCCB 






2 


2 


1 


DTFCCBB2 






2 


2 




ERREXT 


X'10' 


Accept physical I/O 
error 


16 


10 


1 


FLAGBYTE 












AMODTF 


X'80' 
X'20' 


VSAM bit set to 1 if 
DTF belongs to a 
VSAM data set 
Assign "ignore" bit 


17 


11 


.3 


LOGMODAD 




Address of logic module; 
if AMODTF is set to 1 , 
then address of branch 
vector 


20 


14 


1 


FILETYPE 




File type 








LOAD 


X'24' 


LOAD-type DTF 








ADD 


X'25 


ADD-type DTF 








RETRVE 


X'26' 


RETRIEVE-type DTF 








ADDRTR 


X'27' 


ADD-RETRIEVE type 
DTF 


21 


15 


.1 


OPTIONSl 




Options byte 1 
(ISAM options) 








BLKDRECS 


X'08' 


Blocked records 


22 


16 


7 


FNAMEDTF 




File name (DDname) 


29 


ID 


.1 


OPTIONS2 




Options byte 2 (not 
used by IIP) 


30 


IE 


..1 


FNAMEC 
LOAD files: 




Status byte 








UNCIOERR 


X'80' 


Uncorrectable DASD 
I/O error 








WRGLEN 


X'40' 


Wrong length record 
(not used by IIP) 








PDARFULL 


X'20' 


No more VSAM data 
space available 








CYLXFULL 


X'10' 


No more VSAM data 
space available 








MASXFULL 


X'08' 


No more VSAM data 
space available 








DUPREC 


X'04' 


Duplicate record 








SEQCHECK 


X'02' 


Sequence check 








PDAROVFL 


x'or 


Prime data area over- 
flow (not used by IIP) 








Non-LOAD 












files: 












UNCIOERR 


X'80 1 


Uncorrectable DASD 
I/O error 








WRGLEN 


X"40' 


Wrong length record 
(not used by IIP) 








EOF 


X'20' 


End of file 








NORECFND 


X'10' 


No record found 








ILLEGID 


X'08' 


Illegal identifier speci- 
fied (not supported by 
IIP) 



DEFINE THE FILE INDEXED SEQUENTIAL (DTF IS) TABLE (....Cont'd) 



Displacement 


Bytes and 
Alignment 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








DUPREC 


X'04' 


Duplicate record 








OFARFULL 


X'02' 


No more VSAM data 
space available 








OVFLREC 


X'01' 


Overflow record 
(RETRVE) (not used by 
IIP) 


43 


2B 


...1 


RTRBYTE 




RETRVE byte 








WORKR 


X'80' 


WORKR set to 1 if 
WORKR specified 








WORKS 


X'40' 


WORKS set to 1 if 
WORKS specified 


44 


2C 


4 


AMDTFAD 




Address of AMDTF 


48 


30 


4 


CIPROCAD 




Address if IIP 
processor 


52 


34 


4 


SAVERG 




Save area for one 
register 


56 


38 


4 


PPRETAD 




Return address to 
problem program if 
called from a $$B phase 


60 


3C 


4 


RECLOC 




Address of record for 
LOAD IOREG 


64 


40 


1 


CISWITCH 




IIP switches 








WNKA 


X'80' 


Write-new-key-add 
bit 








RKWK 


X'40" 


Read-key-write-key 

bit 

Read-key bit 








RK 


X'20' 








FIRWITE 


X'08' 


First write after SETFL 








FIWOK 


X'04' 


First write is all right 








LD 


X'02' 


LOAD 


74 


4A 


..2 


LRECLEN 




Logical record length 


76 


4C 


2 


KEYLEN 




Key length 


94 


5E 


..2 


KEYLOC 




Key location (not used 
by IIP) 


96 


60 


4 


KARGAD1 




Address of KEYARG, 
moved from part 2 by 
I1POPEN if RTR SEQ 
with KEY (POINT) or 
RTR RAN is specified 


100 


64 


2 


DSPLPRT2 




Displacement of part 2 
(ADD, RTR) 


102 


66 


..2 


DSPLPRT3 




Displacement of part 3 
(ADD, RTR) 


104 


68 


4 


LDIOREGS 




For RTR SEQ : if 
WORKS=l, then NOP; 
if WORKS=0, then 
L IOREG, RECLOC 


108 


6C 


4 


LDIOREGR 




For RTR RAN : If 
WORKR-1, then NOP; 
if WORKR=0, then 
L IOREG, RECLOC 



DEFINE THE FILE INDEXED SEQUENTIAL (DTFIS) TABLE (....Cont'd) 



Displacement 


Bytes and 


Field Name 


Hex 


Description 


Dec Hex 


Alignment 




Digit 




112 70 


4 


WORK AD 1 




Address of V/ORKR 
moved from part 2 


116 74 


4 


IOASAD1 




Address of IOAREAS 
moved from part 2 


120 78 


64 


SAVAR1 




For LOAD-type DTF, 
save area for IIPOPEN 


184 B8 


4 


IOARLAD 




Address of IOAREAL 
for LOAD 


188 BC 


4 


DATIWLAD 




Address of data in 
WORKL for LOAD 


192 CO 


4 


KEY1WLAD 




Address of key in 
WORKL for LOAD 


200 C8 




MIXEXTI 




Master index extension 
indicator for LOAD 






CROREXT 


X'10' 


Create-extend bit 
(create=0; extend=l) 


204 CC 


4 


WORKLAD 




Address of WORKL 
for ADD 


224 E0 


2 


KLM1 




KEYLEN-1 for LOAD 


Part 2 of DTF 


8 8 


4 


IOASAD2 




Address of IOAREAS 


12 C 


4 


IORAD 




Address of IOAREAR 


16 10 


4 


KARGAD2 




Address of KEYARG 


20 14 


4 


WORKRAD2 




Address of WORKR 


24 18 


4 


CURIOAAD 




Address of current 
sequential I/O area 


28 IC 


4 


LIOREGS 




L IOREG, *4 or NOP 
(RTR SEQ) 


68 44 


2 


NTAGRECS 




Number of records 
tagged for deletion 


70 46 


..2 


LIOREGR 




LR IOREG, or NOP 
(RTR RAN) 


Part 3 of DTF 





64 


SAVAR2 




Save area for IIPOPEN, 
not LOAD type 



EXIT LIST (EXLST) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


EXLID 




Control block 
identifier^ '81' 



1 




1 


1 
1 


EXLIDD 
EXACT 


X'81' 


EXLST identifier equate 
Active byte test and set 
X'OO' VSAM Release 1 
X'10'VSAM Release 2 
X'20' VTAM 


2 


2 


2 


EXLLEN 




Length of EXLST 


4 


4 


1 






Reserved 


5 


5 


5 


EXLOAD 




EODAD entry 


5 


5 


1 


EXLEODF 




Entry description bits 


6 


6 


4 


EXLEODP 




Address of the EODAD 
exit routine 


10 


A 


5 


EXLSYN 




SYNAD entry 


10 


A 


1 


EXLSYNF 




Entry description bits 


11 


B 


4 


EXLSYN P 




Entry of the SYNAD 
exit routine 


15 


F 


5 


EXLLER 




LERAD entry 


15 


F 


1 


EXLLERF 




Entry description bits 


16 


10 


4 


EXLLERP 




Address of the LERAD 
exit routine 


20 


14 


5 


EXLIOEX 




EXCPAD entry 


20 


14 


1 


EXLIOEXF 




Entry description bits 


21 


15 


4 


EXLIOEXP 




Address of the EXCPAD 
exit routine 


25 


19 




EXLJRN 




JRNAD entry 


25 


19 




EXLJRNF 




Entry description bits 


26 


1A 




EXLJRNP 




JRNAD pointer 


Bits used 


in indiv 


idual exit f 


ags in bytes show 


n as entry de 


scription 








EXENEXB 


X'80' 


Entry present bit 








EXENACTB 


X'40' 


Entry active bit 








EXENLEB 


X'20' 


Load bit 


Minimum 


length 


EXLST for sp 


ecified entry: 










Dec. 










EXLEODL 


Digit 


Minimum length if EODAD 


10 








EXLSYNL 


15 


Minimum length If SYNAD 








EXLLERL 


20 


Minimum length if LERAD 








EXLIOEXL 


25 


Minimum length if EXCPAD 








EXLJRN 1 


30 


Minimum length if JRNAD 


Minimum and ma 


<imum size c 


>f EXLST : 












EXLMINL 


10 


Minimum length of EXLST 








EXLMAXL 


30 


Maximum length of EXLST 



EXTENT DEFINITION BLOCK (EDB) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








4 


EDBNEDB 




Address of next EDB 


4 


4 


2 


EDBSYMU 
EDBSUCLS 
EDBSUNUM 




Symbolic unit (for CCB) 
Symbolic unit class 
Symbolic unit number 


6 


6 


2 


EDBNUMTR 




Number of tracks of 
extent 


8 


8 


1 


EDBFLGS 




Flags 








EDBDWSS 


X'80' 


Data RBA with sequence 

set 

Sequence set RBA with 








EDBSSWD 


X'40' 












data 








EDBIXREP 


X'20' 


Index replication 








EDBMNT 


X'10' 


Volume mount flag 








EDBLGCC 


X'08' 


Device contains more 
than 256 cylinders 








EDBRPS 


X'04' 


Indicates RPS Device 


9 


9 


3 


EDBMBB 




EDB 


9 


9 


1 


EDBM 




Extent (M) 


10 


A 


2 


EDBBB 




Bin number (BB) 


12 


C 


8 


EDBXTNT 




Force low and high 
CCHH next to each other 


12 


C 


4 


EDBLCCHH 




Low cylinder and head 
numbers 


12 


c 


2 


EDBLCC 




Lowest cylinder 


14 


E 


2 


EDBLHH 




Lowest head 


16 


10 


4 


EDBHCCHH 




High cylinder and head 
numbers 


16 


10 


2 


EDBHCC 




Highest cylinder 


18 


12 


2 


EDBHHH 




Highest head 


20 


14 


4 


EDBLPMBA 




Address of associated 
LPMB 


24 


18 


4 


EDBPARDB 




Address of ARDB 


28 


1C 


2 


EDBVLSQ 




Index to the VOLSER list 


30 


IE 


2 


EDBSTTRK 




Relative track address of 
extent 


32 


20 


8 


EDBRBAS 




Force low and high RBAs 
next to each other 


32 


20 


4 


EDBLORBA 




Low RBA limit 


36 


24 


4 


EDBHIRBA 




High RBA limit 



FIELD PARAMETER LIST (CTGFL) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 







1 




1 


1 
1 
X'00' 

X'nonOO' 

X'80' 
X'60' 
X'20' 
X'40' 
X'AO' 
X'CO' 
X'80' 
X'10' 
X'40' 


CTGFLDNO 
CTGFLDCD 


Number of entries in CTGFLDAT 

Test condition : 

The FPL describes a field to be 

updated or retrieved. The FPL is 

pointed to by the caller's CTGPL 

(CTGFIELD entry). 

The FPL describes a test condition. 

The FPL is pointed to by another FPL. 

Test condition : 

Equal 

Not equal 

Greater than 

Less than 

Greater than or equal 

Less than or equal 

Test under mask for zeros 

Test under mask for ones 

Test under mask for mixed 


2 


2 


1 


CTGFLDGC 


Group code number 


3 


3 


1 

xxxx xxxx 



1 


CTGFLDRE 


Test results : 
Reserved 
Successful test 
Test failed 


4 


4 


4 


CTGFLDWA 


Work area : contains information about 
the catalog record's field name from 
the dictionary 


8 


8 • 


4 


CTGFLDNM 


Address of the field name 


12 


C 


4 


CTGFLCHN 


Address of next field macro or zero 


16 


10 




CTGFLDAT 


Pairs of data length/address 


16 


10 


4 


CTGFLNG 


Data length and address in the 
callers work area of 


20 


14 


4 


CTGFLPT 


• Each field that was retrieved, if 
the request was LOCATE or CMS 
LIST-CAT 

• New data to replace or add to data 
in the catalog record. The request 
was UPDATE, CMS DEFINE or CMS 
ALTER 

• Data used to compare to catalog 
record fields, if the FPL is a FPL- 
for-tests. 



FIELD VECTOR TABLE (CTGFV) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 












1 


CTGFVTYP 


The CTGFV contains information used 
by the CMS Define routines to build 
a cataloy record of the type : 






C'A" 


CTGFVALN 


NonVSAM 






C"C" 


CTGFVCt 


Cluster 






CD" 


CTGFVDTA 


Data 






CM" 


CTGFVIDX 


Index 






C"V" 


CTGFWOL 


Volume 






C"G" 


CTGFVAIX 


Alternate Index 


1 


1 


OR" 

.1 


CTGFVPTH 
CTGFVPRO 
CTGFVAVL 
CTGFVRVL 


Path 
CMS processing option flags : 
ALTER : Add volumes 
ALTER : Remove volumes 






. . XX xxxx 




Reserved 


2 


2 




CTGFVELM 


Element number of CMSPCATR 


3 


3 






Reserved 


4 


4 


4 


CTGFVDCH 


Address of the cluster's data set FVT 


8 


8 


4 


CTGFVICH 


Address of the cluster's index FVT 


12 


C 


4 


CTGFWCH 


Address of the space vector table 


16 


10 


4 


CTGFVIND 


Address of the associated DLBL 
statement 


20 


14 


4 


CTGFVENT 


Address of the entry name FPL 


24 


18 


4 


CTGFVSTY 


Address of the security information 
FPL (passwords, codewords, and 
number-of -tries) 


28 


1C 


4 


CTGFVOWN 


Address of the owner odentification FPL 


32 


20 


4 


CTGFVEXP 


Address of the expiration date FPL 


36 


24 


4 


CTGFVCRE 


Address of the creation date FPL 


40 


28 


4 


CTGFWLT 


Address of the volume serial number list 


44 


2C 


4 


CTGFVRNG 


Address of the key range list 


48 


30 


4 


CTGFVDVT 


Address of the device type FPL (for 
NonVSAM DEFINE only) 


52 


34 


4 


CTGFVSPC 


Address of the space allocation 
information FPL 


56 


38 


4 


CTGFVAMD 


Address of the AMDSB FPL (If VSAM 
DEFINE) 


56 


38 


4 


CTGFVFSN 


Address of the file sequence number 
(if NonVSAM DEFINE) 


60 


3C 


4 


CTGFVATR 


Address of the data set attributes FPL 


64 


40 


4 


CTGFVBUF 


Address of the buffer size FPL 


68 


44 


4 


CTGFVLRS 


Address of the average record size FPL 


72 


48 


4 


CTGFVEXT 


Address of exception exit 


76 


4C 


4 


CTGFVNAM 


Address of related object 


80 


50 


4 


CTGFVUPG 


Address of RGATTR FPL 


84 


54 


4 


CTGFVWKA 


Address of CRA volume identification 


88 


58 


4 


CTGFVPWD 


Relationship password 



LOGICAL-TO-PHYSICAL MAPPING BLOCK (LPMB) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 




1 




1 


1 

1 


LPMID 
LPMBDTF 


X'FF' 


Control block identifier 
Device type 
indicator 


2 


9 


2 


LPMLEN 




Length of the LPMB 


4 


4 


4 


LPMBPTRK 




Number of bytes per 
track 


8 


8 


4 


LPMCASZ 




Number of bytes per 
control area 


12 


C 


4 


LPMBLKSZ 




Physical block size 


16 


10 


2 


LPMTRKCA 




Number of tracks per 
control area 


18 


12 


2 


LPMTPC 




Number of tracks per 
cylinder 


20 


14 


2 


LPMNBQBK 




Number of physical 
records per track 


22 


16 


2 


LPMBPBCI 




Number of blocks 
per CI 



OPEN WORK AREA (1KQOPNWA) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 














WACOMMON 


Common Open/Close work area 




1 



1 


.1 

...1 .... 
.... 1... 

1.. 

1. 

1 


WAFLAG 

TCLOSE 

CLOSE 

OPEN 

OPAMDINX 

VOLFOUND 

SSFLAG 
RETRY 

FILEPROT 
WAERCODE 


Flag byte : 

Work area for TCLOSE 

Work area for CLOSE 

Work area for OPEN 

Index AMDSB is being processed 

Volume serial number is in label 

cylinder record 

Sequence set with data 

Catalog should be reupdated by 

CLOSE 

DOS Supervisor DASD file protect 

Error condition code 


2 


2 


2 


WALEN 


Length of GETVIS area 


4 


4 


4 


WAP IBS V 


Address of partition user save area, 
copy of user PSW, registers 


8 


8 


4 


WALISTP 


Address of user ACB/DTF list 


12 


C 


2 


WACOMR 


Address of DOS communication 
region 


14 


E 


1 


EDBCODE 


One GETVIS obtains enough space 
for 3 EDBs; this field is used to 
count EDBs 


15 


F 


1 




Reserved 


16 


10 


4 


CATEXTPT 


Pointer to extent information in 
order to build EDBs 


20 


14 


2 


CATEXTLN 


Length of total extents 


22 


16 


2 


EXTNUMB 


Number of extents 


24 


18 


80 


USERSAVE 


Room to save user PSW and registers 


104 


68 


4 


WACOMEND 


End of common work area 


104 


68 




OWA 


Partial map of work area obtained 
by GETVIS issued by $$BOVSAM 


104 


68 


4 


WAVSLOD 


Address of location where VSAM 
has been placed by CD LOAD 
(set by $$BOVSAM) 


108 


6C 


4 


WAIKQLAB 


Address of location where IKQLAB 
has been placed by CDLOAD 
(set by $$BOVSAM) 


112 


70 


4 


WARACB 


Pointer to ACB being opened 


112 


70 


4 


CLWAAD 


Close work area address saved 


116 


74 


1 


LBLRCLEN 


Length of work area pointed to by 
LABICPTR in multiple of 128 


117 


75 


3 


LABICPTR 


Pointer to work area reserved for 
label record 


120 


78 


4 


SVCATACB 


Pointer to catalog ACB 


124 


7C 


4 


CTGPLPTR 


Pointer to catalog parameter list 
(CPL) 


128 


80 


4 


CATWKPTR 


Pointer to catalog work area 
(CTGWA) (contents moved to CPL) 


132 


84 


4 


OLDEDB 


Address of last EDB 


136 


88 


4 


NXTEDB 


Address to next EDB 



OPEN WORK AREA (1KQOPNWA) (. . .Continued) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






Catalog F 


eld List for AMDSB 




140 


8C 


8 


FLAMDSB 


Catalog field list work area 
(CTGFLDWA) for AMDSB 


140 


8C 


4 


SAVE RE Tl 


Pointer to contents of return 
register (R14) if not catalog call 


140 


8C 


4 


RETREG1 


Return address to save area 1 


144 


90 


4 


SAVERET2 


Return address to save area 2 


144 


90 


4 


RETREG2 


Return address to save area 2 


148 


94 


4 


FLAMDSBN 


Pointer to catalog field name 


148 


94 


4 


RETREG3 


AMDSBCAT 


148 


94 


4 


* 




152 


98 


4 


WAAMBLIX 


Pointer to index AMDSB 


156 


9C 


4 


FLAMDSB L 


Length of AMDSBCAT 


160 


A0 


4 


FLAMDSBA 


Address of AMDSBCAT 


Catalog Fi 


eld List for Volume Entry(ies) 




164 


A4 


8 


FLENTVOL 




164 


A4 


2 


KRNKEYS 


No. of key ranges equals number 
of ARDBs 


166 


A6 


2 


KRNVOLS 


Number of volumes for this key 
range 


172 


AC 


4 


FLVOLNTN 


Volume entry name VOLE NT 


176 


B0 


4 


* 




176 


B0 


4 


SVLENG 


Length of ENTVOL 


180 


B4 


4 


VOLENTLN 


Length of volume entry 


184 


B8 


4 


VOLGPPTR 


Address of VOLE NT data 


Catalog F" 


eld List for Data Set Attributes 




188 


BC 


20 


* 


DSATTR field list 


208 


DO 


4 


FLDSATRA 


Base of DSATTR 


Catalog Fi 


eld List for Open Indicator 




212 


D4 


8 


FLOPNIND 


Locate OPENIND and test for UPD 


220 


DC 


4 


FLOPNINN 


Open indicator field iist 


224 


E0 


4 


* 




228 


E4 


4 


FLOPNINL 


Length of OPENIND 


232 


E8 


4 


FLOPNINA 


OPENIND address 


Catalog Field List for Minimum Buffer Size 


236 


EC 


20 


* 


Flags, etc., for BUFSIZE 


256 


100 


4 


FLBUFSZA 


Base of BUFSIZE 


Catalog Fi 


eld List for High-Used RBA per Data S 


et 


260 


104 


20 


* 


Miscellany for HURBADS 


260 


104 


20 


NVOLLIST 


No. of volumes per key range 


280 


118 


4 


FLHURDSA 


Base for HURBADS 



Multi-use field 



OPEN WORK AREA (IKQOPNWA) (....Cont'd) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec Hex 


Catalog Field List for ISAM Compatibility (USERINFO) 


284 11C 
304 130 


20 

4 


FLFILTA 


CATFILT field list 
Base for CATFILE 


Catalog Field List for Names of Related Data Sets 


308 134 
308 134 
308 134 
312 138 
316 13C 
320 140 
324 144 
324 144 
328 148 
328 148 


8 
8 

4 
4 
4 
4 
4 
4 
4 
4 


FLNAMEDS 

PARMLIST 

PARM1 

PARM2 

FLNAMDSN 

FLNAMDSL 
NAMEDSLN 
NAMEDSPT 
FLNAMDSA 


Flags for NAMEDS 
IKQVLAB parameter list 
ACB address 
LAB ICPTR address 
Pointer to 'NAMEDS' 

Length of associated names 
Length of associated names 
Address of NAMEDS entry 
Address of NAMEDS groups 


Catalog Field List for Entry Type and Control Interval No. 


332 14C 
340 154 
344 158 
348 15C 
352 160 


8 

4 
4 
4 
4 


FLMISCLN 

FLMISCLL 
FLMISCLA 


CTGFLDWA for this field list 
Pointer to 'DSTYPNAM' 

Length of DSTYPNAM 
Address of DSTYPNAM 


Catalog Field List to Find Catalog ACB Address 


356 164 
376 178 


20 

4 


FLCTACBA 


Field list nr. 10 for catalog ACB 
Pointer to catalog ACB pointer 


Catalog Field List to Test for Write of Open Indicator 


380 17C 
380 17C 
384 180 
388 184 
392 188 
396 18C 
400 190 


8 

4 
4 
4 
4 
4 
4 


FLWOPNND 
TSTENTVL 
TSTENTLN 
FLWOPNNN 

FLWOPNNL 
FLWOPNNA 


Update OPENIND field list 
Address of test ENTVOL (scan) 
Address of end scan ENTVOL 
Pointer to 'OPENIND' 

Length of data 
Pointer to data 


Catalog Field List for Volume Time Stamp 


404 194 
404 194 
424 1A8 


24 

4 


FLTMSTVF 
FLTMSTVA 


VOLTSTMP field list 
Pointer to 'VOLTSTMP' 



Multi-use field 



OPEN WORK AREA (IKQOPNWA) (. . .Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






End of Catalog 


Field List for \ 


/olume Time Stamp 


428 


1AC 


1 


WARNFLG 


Used to save warning error code 


429 


IAD 


1 


* 




430 


1AE 


2 


1 


Index for DO loops 


432 


1B0 


2 


LIMIT 


Count of ENTVOLS (pointed to by 
VOL20PT) 


434 


1B2 


2 


RELGP 


Relative group number in the 
catalog 


436 


1B4 


2 


TEMP 


Local calculations (on same 
listing page) 


438 


1B6 


2 


IARDB 


Index for ARDB list 


440 


1B8 


4 


SAVDEV 


Used to save device type 


444 


1BC 


4 


SAVDEV2 


Used to save sequence set device 
type 


448 


1C0 


2 


SAVTRKAU 


Used to save number of tracks per 
allocation unit (control area) to 
help identify type of LPMB 


450 


1C2 


2 


SAVIRKA2 


Same as SAVTRKAU but used only 
if sequence set with data 


452 


1C4 


4 


RLPMB2 


Pointer to sequence set (index) 
LPMB 


456 


1CB 


1 

1 

.1.. .... 

..1 

...1 .... 

.... 1... 

1.. 

1. 


OWAFLAGS 
OWFLAGZB 

OWFLAGBF 
OWFLAGIB 
WARSOPEN 

DTACNT 
IDXCNT 
WARSCTLG 


Open flags and switches 

User did not specify buffer size 

in ACB 

BCB building in process 

Got buffer with AMBL for index 

Use macro has been issued for 

SYSOPEN (RELEASE macro must 

subsequently be issued) 

Open count in look-aside table 

is bumped for data 

Open count in look -aside table 

is bumped for index 

USE macro has been issued for 

SYSCTLG (RELEASE macro must 

subsequently be issued) 

Reserved 


457 


1C9 


3 


INDEXSAV 


Used to save index file name 


460 


ICC 


1 


SAVTYPE 


Used to save entry type when 
entry is not a cluster 


461 


1CD 


2 


* 


Reserved 


463 


1CF 


4 


TESTSV1 


Save word for testing 


467 


1D3 


1 

1 

• XXX xxxx 


SVOPNIN 
SVOPNINO 


Updated OPEN IND for catalog 
F lag open for output 
Reserved 


468 


1D4 


2 


SVNEXTNT 


Save number of EXTENT statements 


470 


1D6 


2 


SETNBUF 


Count of buffers (used by SETADDR) 


472 


1D8 


4 


VOLSTPTR 


Address of IDAVLST 


476 


IDC 


4 


VOLENTND 


End of allENTVOLs 



Multi-use field 



OPEN WORK AREA (IKQOPNWA) (...Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






480 


1E0 


2 


VO LENTO" 


Count of volume entries 


482 


1E2 


2 


IVOLS 


Working index of VOLENTs 


484 


1E4 


4 


VOL20PT 


Pointer to volume entries to sort 
(address of VOLENT20 if less 
than 20) 


488 


1E8 


80 


VOLENT20 


Volume entries to sort 


568 


238 


4 


VMPTR 


Pointer for right VOLSER 


572 


23C 


4 


REQBUFSP 


Minimum buffer space required 


576 


240 


4 


CURBUFSP 


Currently specified buffer space 


580 


244 


4 


CURBFSPD 


Current buffer space specified for data 


584 


248 


4 


ADDAREA 


Room to add without current 
specifications for index 


584 


248 


4 


CURBFSPI 


Current buffer space specified for index 


588 


24C 


1 


SVLUBPUB 


Save index of PUB 


589 


24D 


1 


NEXTJIB 


Next JIB saved 


590 


24E 


10 


SVPUB 


LUBs for mounted volumes 


600 


258 


2 


IPUB 


Index for SVPUB 


602 


25A 


4 


WRKCINV 


Control interval size used in 
pointing BCBs to buffers 


606 


25E 


8 


OWAPRTCT 


Room to build password 


616 


268 


12 


PARM 


Parameter list for IKQLASMD 


616 


268 


1 


CALLERID 


Caller identification 


617 


269 


7 


DSID 


Data set identification 


617 


269 


3 


DSCI 


Control interval number 


620 


26C 


4 


CTACBPTR 


Pointer to catalog ACB 


624 


270 


1 


SHAREOPT 


Share option from catalog 


625 


271 


1 




Reserved 


626 


272 


2 


OUTCNT 


Number of output users, returned 
from IKQLASMD 


628 


274 


72 


OWPLSAVE 


Save area formatted according to 
PL/S standards 


700 


28C 


72 


OWPLSAV2 


Save area 2 formatted according to 
PL/S standards 


772 


304 


80 


DUMCATPL 


Room for catalog parameter list 


852 


354 


512 


OWACTWKA 


Normal catalog work area 


1364 


554 


8 


CCWX 


CCW definition 


1364 


554 


1 


CCWCODE 


Write-to-console op code 


1365 


555 


3 


CCWDTA 


Pointer to message buffer 


1368 


558 


2 


* 




1370 


55A 


2 


CCWCNT 


Length of message buffer 


1372 


55C 


24 


CCBX 


CCB definition 


1372 


55C 


9 


* 




1381 


565 


3 


CCWPT 


Pointer to channel program (CCWX) 


1396 


574 


65 


VMSG 


Volume name is built and used as part 
of calling parameter when catalog 
is called to get the time stamp 


1396 


574 


65 


MSG 


Volume time stamp built 


1396 


574 


11 


MSGID 


Message identification 



Multi-use field 



OPEN WORK AREA (IKQOPNWA) ( Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






1407 


57E 


8 


MSGDSN 


Data set name 


1415 


587 


46 


MSGTXT 


Message text 


1461 


5B5 


3 


* 




1464 


5B8 


4 


OWSTRTGV 


Start of GETVIS 


1468 


5BC 


4 


UACBAD 


User ACB address 


1472 


5C0 


4 


OWAOAL 


Address of OAL section 


1476 


5C4 


4 


AIXACBAD 


AIX cluster ACB address 


1480 


5C8 


4 


BCACBAD 


Base cluster ACB address 


1484 


5CC 


4 


RPLPAD 


RPL pool just handled 


1488 


5D0 


4 


PLHADDR 


Address of first PLH 


1492 


5D4 


2 


NRPL 


Number of user strings 


1494 


5D6 


2 


AIXBCLEN 


GETVIS length for ACB/RPL 


1496 


5D8 


4 


USBAD 


Pointer to USB 


1500 


5DC 


2 


UPGRM 


Members in upgrade set 


1502 


5DE 


2 


UPGRCT 


Upgrade set loop counter 


1504 


5E0 


4 


UPACBAD 


ACB of upgrade member 


1508 


5E4 


4 


AIXBUFAD 


Upgrade buffer pool 


1512 


5E8 


4 


AIXBUFLN 


Length of upgrade buffer pool 


1516 


5EC 


2 


AIXUPLEN 


Length of upgrade set 
(RPL + PLH) 


1518 


5EE 


2 


* 




1520 


5F0 


24 


FLRGATTR 


Field list RGATTR 


1520 


5F0 


16 


* 




1536 


600 


4 


* 


Length 


1540 


604 


4 


FLRGATRA 


Pointer to RGATTR 


1544 


608 


24 


FLEXCPEX 


Field list exception exit 


1544 


608 


16 


* 




1560 


618 


4 


FLEXCEPL 


Length 


1564 


61C 


4 


FLEXCEPA 


Address 


1568 


620 


4 


OWAUCPL 


Pointer for IKQLAB 


1572 


624 


24 


MSGPARMS 


Parameter list for IKQOCMSG 


1596 


63C 


2 


MSGFLGBT 


Message flag byte 


1598 


63E 


.'].'. .... 
..1. .... 

.... 1... 

1.. 

1. 

1 


AIXFLG 
AIXUPGR 
AIXBASE 
AIXPE 

AIXPATH 
AIXMUS 
AIXEUO 
AIXUSERR 


Alternate index flags 

Upgrade set available 

Base cluster handled 

Path entry handled 

Reserved 

Path structure open 

Member of upgrade set handled 

AIX as and-use object 

Upgrade set error 


1599 


63F 


• XXX xxxx 


AIXFLG2 
AIXTHB 


Alternate index flags 2 
THB for upgrade set 
Reserved 


1600 


640 


.XXX xxxx 


PATHFLG 
PFLUPD 


Path flags 
Update option 
Reserved 



Multi-use field 



OPEN WORK AREA (IKQOPNWA) (. . . Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






1601 


641 


..\. .... 
...1 .... 
.... 1... 


RESETSW 

ESDSERR 

OALEPND 

JRNACT 

CATOPEN 


Flag byte 

Switch for reset 

ESDS error flag 

OAL entry found 

JRNAD activ 

Catalog open in procedure 

Reserved 


1602 


642 




SAVAIX 


Save area for AIXFLG 


1603 


643 


2 


AIXUSAV 


Save area for ACB option 


1605 


645 


3 


AIXYENTR 


Internal address of y-entry 


1608 


648 


3 


AIXDNAM 


AIX data name 


1611 


64B 


3 


AIXINAM 


AIX index name 


1614 


64E 


3 


BCDNAM 


Base cluster data name 


1617 


651 


3 


BCINAM 


Base cluster index name 


1620 


654 


3 


CLUNAME 


Cluster name save area 


1623 


657 


8 


NAMEFLD 


Use RELSE parameter list 


1631 


65F 


72 


OWPLSAV3 


Third level save 


1703 


6A7 


80 


INTCPL 


Internal CPL 


1783 


6F7 


5 


INTWA 


Internal catalog work area 


1788 


6FC 


512 


OWA2 


Work area 


1788 


6FC 


512 


OWAUCAT 


IKQCAT work area for UCAT 


1788 


6FC 


512 


USCTGWA 


Catalog work area in IKQOPNUS 


1788 


6FC 




OWAMSGAR 


Message work area 



Multi-use field 



PLACEHOLDER (PLH) 



Offset 
Dec Hex 


Bytes 


Field Name 


Hex 
Digit 


Description 


Standard Save Area 





4 4 

8 8 
12 C 


72 
4 
4 

4 
60 


PLHSAREA 
PLHSADDR 

PLHSAVE 




Register save area 

Reserved 

Address of user's save 

area 

Reserved 

Save area for 15 registers 

(Reg. 0-1 4) 


Buffer Manager and I/O Manager Save Area 


72 48 


44 


PLHBSAVE 




Buffer manager and I/O 
manager save area 
(Reg. 9- 14 and Reg 0-4) 


Index Search and Get Next Save Area 


116 74 
164 A4 


48 
16 


PLHIXSSV 
PLHJRNSV 




Index search and get next 

save area 

J RN AD save area 


Return Register Stacks 


180 B4 
180 B4 
184 B8 


8 
4 
4 


PLHSTCK 
PLHSTCK1 
PLHSTCK2 




Fixed return register stack 
Return register from level 1 
Return register from level 2 


RPL Pointers 


188 BC 
192 CO 


4 
4 


PLHHRPL 
PLHCRPL 




Pointer to header RPL 
Pointer to current RPL 


PLH ECB 


196 C4 

196 C4 

197 C5 

198 C6 

199 C7 


4 
1 
1 
1 

1 


PLHECB 

PLHAUSE 
PLHECOM 
PLHEWAIT 
PLHECBT 


X'80' 


Event control block 

Reserved 

Request active on PLH 

Communications byte 

Wait flag on ECB 

Test and set byte for ECB 


PLH Work Area 


200 C8 


44 


PLHWAREA 




PLH work area 


PLH Identification Byte 


244 F4 


1 


PLHID 


X'55' 


PLH identification byte 


PLH Use Gate 


245 F5 


1 


PLHUSE 




PLH use gate 



PLACEHOLDER (PLH) (...Continued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec Hex 






Digit 




PLH Condition Flags 


246 F6 


1 


PLHFLAG 
PLHST 

PLHPOS 

PLHEOD 

PLHWAIT 
PLHSKIP 

PLHRST 
PLHFST 
PLHRREAD 




PLH condition flags 
PLH status flag (bit 0) 
1 - PLH set 

- PLH invalid 

PLH position flag (bit 1) 

1 - Next record 

- previous record 

PLH end-of-date-condition 
flag (bit 2) 

1 - EOD reached 
0-NotEOD 

PLH wait flag (bit 3) 
1 - I/O pending 

- No I/O pending 
PLH skip flag (bit 4) 

1 - Skip control interval 

- Don't skip control 

interval 
PLH restart flag (bit 5) 

1 - Restart 

- No restart 

PLH first-time flag (bit 6) 

1 - First time 

2 - Not first time 
PLH exclusive control 
reread flag (bit 7) 

1 - Need reread 

- Reread not needed 


247 F7 


1 


PLHFLG 




PLH spare condition flag 


PLH Communivation Switches 


248 F8 


1 


PLHSWITCH 




PLH communication switches 






PLH LOAD 


X'80' 


PLH load or resume load 
indicator 






PLHKRCH 


X'40* 


PLH key range change 
indicator 






PLHMSRT 


X'20' 


Mass insert indicator 






PLHFSR 


XMO' 


First request for data set 
indicator 






PLHSTBC3 


X'04' 


Demand a BCB from 
STEAL000 (IKQBFA00) 






PLHEC 


X'02' 


Exclusive control needed 



PLACEHOLDER (PLH) ( . . . Continued) 



Offset 
Dec 


Hex 


Bytes 


Field Name 


Hex 
Digit 


Description 


Previous Request Characteristics 


249 
249 
250 
250 
251 


F9 
F9 
FA 
FA 
FB 


3 
1 
2 
1 
1 


PLHPREO 

PLHRTC 

PLHOPT 

PLHOPTl 

PLHOPT2 




Previous request information 
Previous request-type code 
Previous request option bytes 
First option byte 
Second option byte 


Multiple String Support 


252 
253 
254 

255 


FC 
FD 
FE 

FF 


1 
1 
1 

1 


PLHSTRID 
PLHENDRQ 
PLHINDS 
PLHCLOSE 


X'80' 


PLH string ID (1-255) 
ENDREQ request gate byte 
Indicator byte 

Close-type ENDREQ request 
Reserved 


EXCPAD Parameter List Pointer 


256 


100 


4 


PLHPARML 




EXCPAD parameter list 


JRNAD Parameter List Pointer 


260 


104 


4 


PLHAJRN 




JRNAD paramater list 
pointer 


I/O Manager Entry Point 


264 


108 


4 


PLHIOMGR 




I/O Manager (IKQIOA00) 
entry point 


Key Range Support Fields 


268 
272 


10C 
110 


4 
4 


PLHDCRDB 
PLHDTRDB 




Address current ARDB 
Address target ARDB 


Pointers to Buffer Headers (BHDs) 


276 
280 
284 
288 

292 


114 
118 
11C 
120 

124 


4 
4 
4 
4 

4 


PLHDBHD 
PLHIBHD 
PLHBRPL 
PLHTHB 




Address of data BHD 
Address of index BHD 
Save header RPL 
Address of THB (share 
option 4) 
Reserved 


Data PLH 


296 
296 
296 
300 
300 


128 
128 
-128 
12C 
12C 


36 
20 
4 
8 
4 


PLHDATA 

PLHDCNV 

PLHDRBA 

PLHDBUF 

PLHDBCB 




Data PLH 

Data CNV information 

Data CNV RBA 

Data buffer description 

Address of data BCB 



PLACEHOLDER (PLH) (...Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




304 


130 


4 


PLHDBAD 




Address of data buffer 


303 


134 


4 


PLHDCIDE 




Data CNV CIDF 


308 


134 


2 


PLHDFSO 




Data CNV free space offset 


310 


136 


2 


PLHDFSL 




Data CNV free space length 


312 


138 


1 


PLHDSW 




Data CNV switches 








PLHHOLD 


X'80' 


Track hold indication 








PLHHELD 


X'40' 


Track free indication 








PLHNORD 


X'10' 


No read indication 








PLHLOG 


X'08' 


Logical GETBUFF request 








PLHRAHD 


X'04' 


Read-ahead request 


313 


139 


1 


PLHDSW1 




Buffer request control switch 








PLHEHOLD 


X'80' 


Exclusive control desired 








PLHEHELD 


X'40' 


Exclusive control held 








PLHEACTV 


X'20' 


Exclusive control active 


314 


13A 


2 


PLHDCSZ 




Data CNV size 10 
(rightmost RDF) 








Data Record D 


ascription 




316 


13C 


16 


PLHDRCD 




Data record description 


316 


13C 


2 


PLHDRO 




Data record offset 


318 


13E 


2 


PLHDRDF 




Data record RDF-offset 


320 


140 


2 


PLHDRIX 




Data record RDF-index 


322 


142 


2 






Spare 


324 


144 


4 


PLHDRRBA 




Data record RBA 


328 


148 


4 


PLHDRL 




Data record length 








Read-Ahead D 


3ta PLH 




332 


14C 


24 


PLHBDATA 




Data read ahead PLH 


332 


14C 


4 


PLHBRBA 




RBA of next CNV to read 
ahead 








Read-Ahead D 


3ta CNV Desc 


ription 


336 


150 


10 


PLHBDCNV 




Read-ahead data CNV 
information 


336 


"150 


4 


PLHBDRBA 




Data CNV RBA 


340 


154 


8 


PLHBDBUF 




Data buffer description 


340 


154 


4 


PLHBDBCB 




Address of data BCB 


344 


158 


4 


PLHBDBAD 




Address of data buffer 


348 


156 


4 


PLHBDCDF 




Data CNV CIDF 


348 


15C 


2 


PLHBDFSO 




Data CNV free space offset 


350 


15E 


2 


PLHBDFSL 




Data CNV free space length 


356 


160 


1 


PLHBDSW 




Data CNV switches 


353 


161 


1 


PLHBDSW1 




Buffer request control switch 


354 


162 


2 


PLHBDCSZ 




Data CNVsize-10 



PLACEHOLDER (PLH) (.. 


Continued) 






Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Alternate Index Record Information 


356 


164 


16 


PLHAIX 




AIX record information 


356 


164 


4 


PLHAIXPT 




Address of base cluster 
pointer 


360 


168 


4 


PLHAIXWA 




Pointer to work area 


364 


16C 


4 


PLHAIXWL 




Work area length 


368 


170 


2 


PLHAIXPN 




Counter of base cluster 
pointer 


370 


172 


2 


PLHAIXOP 




RPL Option bytes 


372 


174 


12 


PLHUPG 




Upgrade set information 


372 


174 


4 


PLHUPGP1 




Current USB entry address 


376 


178 


4 


PLHUPGP2 




Last USB entry address 


380 


17C 


4 


PLHUPGAD 




Address of prime key 
(KSDS) or RBA (ESDS) of 
base cluster record 


384 


180 


24 


PLHAIXSV 




AIX save area 


Spanned Record Flag Byte 


408 


198 


1 


PLHSWT2 




Spanned record switch byte 








PLHSPAN 


X'80' 


Spanned record indicator 








PLHSRU 


X'40' 


Called from IKQSRU 








PLHSRUF 


X'20' 


First call from IKQSRU 








PLHSRU L 


X'10' 


Last call from IKQSRU 








PLHSRCAS 


X'08' 
X'04' 


CA-split necessary 
Reserved 








PLHSREC 


X'02' 
X'Ol' 


Exclusive control indicator 
Reserved 


JRNAD Flag Byte 


409 


199 


1 


PLHJRN 




JRNAD flag byte 








PLHJRACT 


X'80' 


JRNAD exit active 








PLHJRVSM 


X'40' 


JRNAD called from 
IKQVSM 








PLHJRMDY 


X'20' . 


JRNAD called from 
IKQMDY 








PLHJRCIS 


X'10' 


JRNAD called from IKQCIS 








PLHJRCA1 


X'08' 


JRNAD first call from 
IKQCAS 








PLHJRCA2 


X'04' 


JRNAD second call from 
IKQCAS 








PLHJRSRG 


X'02' 


JRNAD called from 
IKQSRG 








PLHJRSRU 


X'Ol' 


JRNAD called from 
IKQSRU 



PLACEHOLDER (PLH) (. . . Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Spanned Record Information 


410 


19A 


2 


PLHSRCNT 




Number of segments 


412 


19C 


22 


PLHSPREC 




Spanned record information 


412 


19C 


8 


PLHRCD 




Spanned record description 


412 


19C 


4 


PLHAREA 




Pointer to user area 


416 


1A0 


4 


PLHRLEN 




Length of spanned record 


420 


1A4 


4 


PLHSRRBA 




RBA of record 


424 


1A8 


2 


PLHX1E0 




Index entry offset of l.part 


426 


1AA 


2 


PLHXPTR 




Pointer number 


428 


1AC 


6 


PLHSRRDF 




Double RBF for spanned 
record 


428 


1AC 


1 


PLHSRR2 




R byte 2 


429 


IAD 


2 


PLHSRLVL 




Level number 


431 


1AF 


1 


PLHSSR1 




R byte 1 


432 


1B0 


2 


PLHSRLL 




Length of segment 


434 


1B2 


1 


PLHSWT1 


X'80' 
X'40' 
X'20' 
X'10' 


PLH communication switch 

control 

Reserved 

Rese rved 

Reserved 

Reserved 








PLHUPRES 


X'08' 


A IX upgrade reset switch 








PLHPCI 


X'04' 


Previous control interval 








PLHBWD 


X'02' 


0=Forward, l=backward 








PLHLRD 


X'Ol' 


0=any record, l=last record 


435 


1B3 


1 


PLHFLG1 


X'80' 
X'40' 
X'20' 
X'10' 


Flag byte continuation 

Reserved 

Reserved 

Reserved 

Reserved 








PLHDUKEY 


X'08' 


Duplicate key in AIX record 








PLHAIXRP 


X'04' 
X'02' 
X'02' 


AIX repositioning flag 

Reserved 

Reserved 








Index PLH 






436 


1B4 


40 


PLHINDEX 
PLHLESDS 




Index PLH 

Length of PLH for ESDS 








Index CNV De 


scription 




436 


1B4 


20 


PLHXCNV 




Index CNV information 


436 


1B4 


4 


PLHXRBA 




Index CNV RBA 


440 


1B8 


8 


PLHXBUF 




Index buffer description 


440 


1B8 


4 


PLHXBCB 




Address of index BCB 


444 


1BC 


4 


PLHXBAD 




Address of index buffer 


448 


ICO 


4 


PLHXCIDF 




Index CNV CIDF 


448 


ICO 


2 


PLHXFSO 




Index CNV free space 
offset 



PLACEHOLDER (PLH) (. . .Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




450 


1C2 


2 


PLHXFSL 




Index CNV free space length 


452 


1C4 


1 


PLHXSW 




Index CNV switches 


453 


1C5 


1 


PLHXSW1 




Buffer request control 


454 


1C6 


2 


PLHXCSZ 




Index CNV size- 10 


Index Entry Description 


456 


1C8 


20 


PLHXETRY 




Index entry description 


456 


1C8 


2 


PLHXEO 




Index entry offset 


458 


1CA 


2 


PLHXSEO 




Next section entry offset 


460 


ICC 


4 


PLHXSOP 




Last section entry offset 
pointer 


464 


1D0 


2 


PLHXLVL 




Present index level in 
process 


466 


1D2 


2 


PLHXLEVP 




Previous level index 


468 


1D4 




PLHXPTRP 




Previous entry-s p-field 


468 


1D4 


2 


PLHXEOP 




Previous entry offset 


470 


1D6 


2 


PLHXSEOP 




Previous section entry 
offset 


472 


1D8 


4 


PLHXRBAP 




Previous index record RBA 


Read -Ahead Index PLH 


476 


IDC 


28 


PLHBINDX 




Read-ahead index PLH 


Read-Ahead Index CNV Description 


476 




20 


PLHBXCNV 




Read -ahead index CNV 
information 


476 




4 


PLHBXRBA 




Index CNV RBA 


480 




8 


PLHBXBUF 




Index buffer description 


480 




4 


PLHBXBCB 




Address of index BCB 


484 


1E4 


4 


PLHBXBAD 




Address of index buffer 


488 


1E8 


4 


PLHBXCDF 




Index CNV CIDF 


488 


1E8 


2 


PLHBXFSO 




Index CNV free space offset 


490 


1EA 


2 


PLHBXFSL 




Index CNV free space length 


492 


1EC 


1 


PLHBXSW 




Index CNV switches 


493 


1ED 


1 


PLHBXSW1 




Buffer request control switch 


494 


1EE 


2 


PLHBXCSZ 




Index CNV size-10 


Read-Ahead Index Entry Description 


496 


1F0 


2 


PLHBXEO 




Index entry offset 


498 


1F2 


2 


PLHBXSEO 




Next section entry offset 


500 


1F4 


4 


PLHBXSOP 




Last section entry offset 
pointer 


Previous Record Key Information 


504 


1F8 


) 


PLHPKEY 
PLHLKSDS 




Key of previous record 
Basic length of PLH for 
KSDS 



REQUEST PARAMETER LIST (RPL) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


RPLID 




Control block identifier^ 
X'00 1 




1 



1 


1 

1 


RPLIDD 
RPLACT- 


X'00' 


RPL equate 

Active byte test and set 
X'00' VSAM Release 1 
X'10' VSAM Release 2 
X'20' VTAM 


2 


2 


2 


RPLLEN 




Length of RPL 


4 


4 


4 


RPLRBA 




RBA of last record processed 


4 


4 


4 


RPLDDDD 




DD field 


8 


8 


4 


RPLARG 




Pointer to search argument 


12 


C 


8 


RPLRCD 




Record description 


12 


C 


4 


RPLAREA 




Address of the caller's 
work area 


16 


10 


4 


RPLRLEN 




Length of record 


20 


14 


4 


RPLBUFL 




User buffer size 


24 


18 


4 


RPLACB 




Address of the caller's ACB 


24 


18 


4 


RPLDACB 




Catalog compatibility 


28 


1C 


1 


RPLSTRID 




RPL string identifier 


29 


ID 


1 


RPLREQ 




Request type 








RPLPOINT 


X'00 1 


POINT request 








RPLGET 


X'04' 


GET request 








RPLERASE 


X'08' 


ERASE request 








RPLPUT 


X'OC 


PUT request 








RPLUPDTE 


X'OC 


Update request 








RPLINSRT 


X'10' 


Insert request 








RPLCHECK 


X'14' 


Check request 








RPLRCLSE 


X'18' 


RCLOSE request 








RPLENDRQ 


X'lC • 


ENDREQ request 








RPLFRCIO 


X'lC 


FORCIO request 








RPLVERFY 


X'20' 


VERIFY request 








RPLPUT L 


X'24 1 


PUT locate request 


30 


IE 


2 


RPLKEYL 




Key length 


32 


20 


2 


RPLOPTCD 




Option codes 


32 


20 


1 


RPLOPT1 




First byte of options 








RPLKEY 


X'80' 


Keyed access 








RPLADR 


X'40' 


Addressed access 








RPLSEQ 


X'20' 


Sequential 








RPLDIR 


X'10' 


Direct processing 








RPLASY 


X'08' 


Asynchronous 








RPLSKP 


X'04' 


Skip sequential access 








RPLCNV 


X'02' 


CNV access (RBA) 








RPLUPD 


x'or 


Update 


33 


21 


1 


RPLOPT2 




Second byte of options 








RPLKGE 


X'80' 


Search key greater than or 
equal 








RPLGEN 


X'40' 


Generic key request 








RPLNSP 


X'20' 


Note string position 








RPLNUP 


X'10' 


No update 








RPLLOC 


X'08' 


Locate mode 








RPLUBF 


X'04' 


User buffers 








RPLBWD 


X'02' 


0=Forwards, l=backwards 








RPLLRD 


x'or 


0=Any record, l=Last record 



REQUEST PARAMATER LIST (RPL) (. . .Continued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




34 


22 


1 


RPLHLD2 


X'FF' 
X'OO' 


Second test and set byte 
(RPL not available) 
RPL available 


35 


23 


1 


RPLHLD 


X'FF' 
X'OO' 


Test and set byte (RPL held- 
request not completed) 
Request completed 


36 


24 


1 


RPLFLAG 


X'FF' 


F lag byte 
Reserved 


37 


25 


3 


RPLFDBK 




Error feedback area 


37 


25 


1 


RPLFDBK1 




Error class (return) code 


37 


25 


1 


RPLRTNCD 




Error class code 


38 


26 


1 


RPLFDB2 




Function type code 


39 


27 


1 


RPLFDB3 




Error type code 


39 


27 


1 


RPLERRCD 




Error type code 


39 


27 


1 


RPLFDBKC 




Error type code 


The following equates are for the various feed 


sack return 


s that may be set for offset 


39 (27). 


They fall into the four categories sho 


wn. 




Register 


15 setting for error feedback code 












RPLNOERR 


X'OO' 


No error detected 








RPLNORPL 


X'04' 


RPL held by another request 








RPLLOGER 


X'08' 


Logical error 








RPLPHYER 


X'OC 


Physical error 








RPLVABND 


X'3C 


ABEND encountered (VTAM) 


Returns that are not errors (Register 15 = X'OO') 








RPLEOV 


X'04' 


EOV called during request 








RPLDPKEY 


X'08' 


Duplicate key 


Logical 


errors (register 15 = X'08') 












RPLEOFDS 


X'04' 


End of data set encountered 








RPLEODER 


X'04' 


End of data set encountered 








RPLDUPRC 


X'08' 


Duplicate record 








RPLDUP 


X'08' 


Duplicate record 








RPLSEQCK 


X'OC 


Sequence error 








RPLNRFND 


X'10' 


No record found 








RPLNOREC 


X'10' 


No record found 








RPLEXCTL 


X'14' 


Data already in exclusive 
control 








RPLNVOLM 


X'18' 


Volume or extent 
unavailable 








RPLNRSPA 


X'lC 


No DASD space available 








RPLNOEXT 


X'lC 


No DASD space available 








RPLSPACE 


X'lC 


No DASD space available 








RPLINRBA 


X'20' 


Invalid RBA specified 








RPLNKEYR 


X'24' 


No key range for new record 








RPLNOVIR 


X'28' 


Insufficient virtual storage 



REQUEST PARAMETER LIST (RPL) (. . .Continued) 



Offset 


Bytes 


Field Name 


Hex - 


Description 


Dec Hex 






Digit 








RPLWRKAS 


X'2C 


User's work area not large 
enough 






RPLCDLOD 


X'30' 


CD LOAD failure 






RPLVLERR 


X'34' 


Internal VSAM logic error 






RPLNOPLH 


X'40' 


PLH in use (no string 
available) 






RPLNOPEN 


X'44' 


Access type not requested 
at Open 






RPLKEYES 


X'48' 


Keyed request for ESDS 






RPLADRKS 


X'4C 


ADR or CNV insert for 
KSDS 






RPLINERS 


X'50' 


Illegal ERSAER request 






RPLINLOC 


X'54' 


Illegal locate mode 
specification 






RPLNOPOS 


X'58' 


Positioning error 






RPLNGUPD 


X'5C 


No valid GET UPD issued 






RPLUPDKC 


X'60' 


Key change during update 






RPLLENCN 


X'64' 


Length change for addressed 
update 






RPLCONOP 


X'68' 


Improper or conflicting 
RPL options 






RPLIMRCL 


X'6C 


Improper RECLEN specified 






RPLIMGKL 


X'70' 


Improper generic key length 
specified 






RPLINLD 


X'74' 


Illegal request during data 
set load 






RPLCATLG 


X'80' 


Internal catalog call 
failure 






RPLSRLOC 


X'84' 


Illegal locate mode 






RPLSRADR 


X'88' 


Illegal request for spanned 
record 






RPLINCSR 


X'8C 


Inconsistent spanned record 






RPLNOBAS 


X'90' 


No base record 






RPLMAXPT 


X'94' 


Maximum of pointers 
exceeded 






RPLINVRR 


X'CO' 


Invalid relative record 
number 






RPLRRADR 


X'C4' 


Illegal address requested 
(RRDS) 






RPLIPATH 


X'C8' 


Illegal path access 






RPLINBWD 


X'CC 


Illegal backward mode 
requested 


Physical errors (register 15 = X'OC 






RPLRDERD 


X'04' 


Data read error 






RPLRDER1 


X'08' 


Index read error 






RPLRDERS 


X'OC 


Sequence set read error 






RPLWTERD 


X'10' 


Data write error 






RPLWTER1 


X'14' 


Index write error 






RPLWTERS 


X'18' 


Sequence set write error 



REQUEST PARAMATER LIST (RPL) (. . .Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




40 


28 


4 


RPLCHAIN 




Pointer to next RPL 


44 


2C 


1 


RPLAIXID 


X'80' 
X'40' 
X'20' 
X'10' 
X'08' 
X'04' 
X'02' 


AIX information byte 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 








RPLAXPKP 


X'01' 


Prime key pointer 


45 


2D 


2 


RPLAIXPC 




Number of pointers 


48 


30 


4 


RPLMLOAD 




CBM module load address 



TRACK HOLD BLOCK (THB) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


THBID 


X'88" 


Control block identification 


1 


1 


1 


THBFLAG 


X'00' 


Flag byte 








THBACTV 


X'80' 


This THB is active 








THBPSUDO 


X'40' 


Track hold not issued 








THBREAL 


X'20' 


Track hold issued 


2 


2 


2 


THBLEN 




Length of THB 


4 


4 


2 






Available 


6 


6 


2 


THBTID 




Task ID 


8 


8 


16 


THBCCB 




CCB area 


24 


18 


8 


THBCCW 




CCW area 


24 


18 


1 


THBCCWOP 




CCW operation code 


25 


19 


3 


THBCCWAD 




CCW argument address 


28 


1C 


2 






Available 


30 


IE 


2 


THBCCWCT 




CCW byte count 


32 


20 


20 


THBIODRB 




ODRB area 


32 


20 


4 






Available 


36 


24 


8 


THBARG 




MBBCCHHR 


44 


2C 


8 






Available 


52 


34 


48 


THBSAVE 




Save area for 12 registers 



FIELD CONTROL AND DATA BLOCK (FCDB) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










64 


FCB 




Maps the module FCB 








56 






Space for use in the block 


56 


38 


1 


FCBTIC 




Reserved for a TIC 
operation code 


57 


39 


3 


FCBCHAIN 




Pointer to next block 


60 


3C 


1 


FCBCFL 




Reserved for chaining flag 


61 


3D 


1 


FCBALI 




Allication indicator 








FCBPRVA 


X'04' 


Previous request allocated 








FCBPRVSV 


X'08' 


Previous request save 


62 


3E 


2 


FCBOFSET 




Offset pointer in block 



BLOCK POOL HEADER (BKPHP) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










2 


BKPLENG 




Length of the pool of 
blocks 


2 


2 


2 






Available 


4 


4 




BKPHDECB 




Control allocation of 
blocks 


4 


4 


2 






Not used 


6 


6 


1 


BKPHDCOM 




Communications byte 








BKPHWAIT 


X'80' 


Wait flag 


7 


7 


1 


BKPHDTS 




Test and set byte 
allocation 


8 


8 


32 


BKPHRSAV 




Space for saving 
registers -steal 


8 


8 


4 


BKPHRS13 




Save register 13, swap 
PLH 


12 


C 


4 


BKPHRS14 




Save register 14 during 
steal 


16 


10 


4 






Save register 15 during 
steal BCB 


20 


14 


4 


BKPHRS00 




Save register during 
steal BCB 


24 


18 


4 


BKPHRS01 




Save register 1 


28 


1C 


4 






Save register 2 


32 


20 


4 






Save register 3 


36 


24 


4 






Save register 4 


40 


28 


4 


BKPHDBHD 




Save data buffer header- 
steal 


44 


2C 


4 


BKPH1BHD 




Save index buffer header - 
steal 


48 


30 


4 


BKPSPCHN 




Address of next area of blocks 


52 


34 


4 


BKPERCCB 




Address of CCB chain of 
errors 


56 


38 


4 


BKPFSTBK 




Address of first available 
blocks 


60 


3C 


4 


BKPSTECB 




ECB-steal BCB, other string 


60 


3C 


2 






Available 


62 


3E 


1 


BKPSTCOM 




Communications byte 








BKPSWAIT 


X'80' 


Wait flag 


63 


3F 


1 


BKPSTTS 




Test and set block 



UPGRADE SET BLOCK (USB) 



Offset 
Dec Hex 


Bytes 


Field Name 


Hex 
Digit 


Description 




1 1 

2 2 

4 4 

6 6 

8 8 
12 C 
14 E 
16 10 


1 

1 
2 
2 

2 

4 
2 
2 
4 


USB ID 

USBIDD 

USBACT 

USBLEN 

USBMAXDB 

USBMAXIB 

USBWAPTR 
USBMIN 
USBWALEN 
USBPLH 


X'EO' 


USB identifier 

USB equate 

Active byte, test and set 

Length of this block 

Max .data buffer in upgrade 

set 

Max. index buffer in 

upgrade set 

Pointer to work area pool 

Min. required record length 

Work area length 

Pointer to PLH 


Begin of first/only Index Entry 


20 14 

24 18 
26 1A 


4 

2 
2 


USBAIX 
USBACB 
USB LAST 
USBRKP 
USBKL 


X'80' 


Pointer to ACB 
Last entry indicator 
Relative key position 
Key length 


Next Alternate Index Entry 


28 IC 











OPEN ACB LIST (OAL) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 





1 




1 


1 
1 


OALID 
OALIDD 




OAL identifier 
Reserved 


2 


2 


2 


OALLEN 




Length of this block 
(max. 512) 


4 


4 


4 


OALNOAL 




Pointer to next OAL 


8 


8 


2 


OALNOPN 




No of open data sets or 
partitions 


10 


A 


2 


OALNENT 




No. of OAL entries 
(max. 62) 


12 


C 


4 


OALACB 




Address of opened ACB 


16 


10 


1 


OALSVC 




Delimiter (X'OA 1 ) 


17 


11 




OALFLG 




Flag byte 








OALACT 


X'80' 
X'40' 
X'20' 
X'10* 
X'08' 
X'04' 
X'02' 
X'OT 


ACB is open 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 


18 


12 


2 


OALCICHK 




Value to check validity 
of cylinder no. of data set 
in catalog 



III - 73 



SERVICE AIDS 

Service aid phases are available for : 

Enabling and disabling snap dumps within the VSAM component. 

Obtaining snap dumps of control blocks . 

Using UPSI to obtain diagnostic information for the VSAM catalog. 

Maintaining DSCBs in the VTOC and VOL1 labels on DASD. 

Loading a VSAM phase or a program you have written. 

he service aid phases IKQVDUMP and $$BCVS03 are included in the link-edit 
of VSAM. The other three phases, IKQVEDA, IKQVDU, and $$BCVS04 can be 
placed in the core image library by executing the following job. 



//JOB 




JOBNAME 


//OPTION 




CATAL 


INCLUDE 




IKQCLNLK 


/* 






//EXEC 




LNKEDT, REAL 


/& 






Enabling and Disabling 


Snap 


Dumps 



The following snap points are available in VSAM. Each snap ID, if enabled with 
IKQVEDA, will produce the result indicated. 

Snap numbe r Result of Enabling this Snap 

0001 This snap allows Catalog Management diagnostic information to be 
obtained. (See section 'Using UPSI to obtain Diagnostic Information 
for the VSAM Catalog ' for details.) 

As snap 0001 uses the UPSI byte, it cannot be run when the user 
program in the partition also uses the UPSI byte. 

0002 This snap enables the Buffer Manager trace, which provides the 
current usage of VSAM buffering. 

0003 This snap enables the CLOSE control block dump at the beginning 
of CLOSE processing. 

0004 This snap enables the VSAM I/O trace facility. 

0005 This snap enables the I/O error trace. 

0006 This snap enables the OPEN control block dump facility when open 
processing is complete. 

0007 This snap enables the OPEN error trace. Control blocks are printed 
if an error occurs during open processing. 

0008 This snap enables the Catalog Management I/O trace. All I/O 
operations done by catalog management are printed on SYSLST. 

0009 This snap enables the VSAM Record Management error handler trace, 
allowing display of control blocks for any error detected by VSAM 
record management. 



SERVICE AIDS (...Continued) 

Enabling and Disabling Snap Dumps (. . .Continued) 

IKQVEDAis called by: 

//EXEC IKQVEDA 
The routine will print on SYSLOG : 

ENTER FUNCTION ENABLE/DISABLE/END 

You must enter either : 

ENABLE SNAP = xxxx 

(where xxxx is one of the snap numbers) 

or 

DISABLE SNAP =xxxx 
or 

END (to terminate processing). 
The program will look for a private core image library and print: 

NO PRIVATE CORE IMAGE LIBRARY ASSIGNED 

if it cannot be found and will than look in the core image library for the 
VSAM phase needed. 

If the phase needed cannot be found in a library the program will inform 
you with the following message : 

PHASE NOT FOUND IN THE SYSTEM PRIVATE 
CORE IMAGE LIBRARY 

Any error in input will result in the INVALID REPLY message and the 
ENTER FUNCTION message is reissued. 

The program can only be ended by the END reply as noted earlier. 

The following examples illustrate the use of IKQVEDA to enable and disable 
SNAP 0001 : 

// EXEC IKQVEDA 

ENTER FUNCTION ENABLE/DISABLE/END 

ENABLE SNAP =0001 

NO PRIVATE CORE IMAGE LIBRARY ASSIGNED 

SNAP 0001 ENABLED 

ENTER FUNCTION ENABLE/DISABLE/END 

DISBALE SNAP = 0001 

NO PRIVATE CORE IMAGE LIBRARY ASSIGNED 

SNAP 0001 DISABLED 

ENTER FUNCTION ENABLE/DISABLE/END 

END 



SERVICE AIDS (. . .Continued) 



Obtaining Snap Dumps of Control Blocks 

IKQVDUMP enables you to print out snap dumps of record management and catalog 
control blocks. Code is provided at certain points in VSAM modules which is 
nonoperational so far as normal execution of the modules is concerned. Refer to 
'Enabling and Disabling Snap Dumps'. 

IKQVDUMP is called by the following sequence of instructions (See also 'Loading 
a VSAM phase or a Program You Have Written') : 



LA 
SVC 



1, PARMLIST 
2 



DC 
DC 



CL8'$$BCVS03' 
CL8' IKQVDUMP' 



B transient 

phase that provides dump of 

control blocks 



When the program has completed processing, $$BCVS03 returns the program to the 
instruction immediately following the SVC instruction. 



Figure below shows the description and format of the parameter list that follows 
the two phase names in the above calling sequence. 



Offset 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 









1 


PARMSW1 


First byte of parameter list 




1 


PARMAMBL 


Dump the AMBL 




.1 


PARMACB 


Dump the ACB 




..1 


PARMAMDS 


Dump the AMDSB 




...1 .... 


PARMARDB 


Dump the ARDB 




.... 1... 


PARMBCB 


Dump the BCB 




1.. 


PARMBUFE 


Dump the buffer 




1. 


PARMEDB 


Dump the EDB 




1 


PARMLPMB 


Dump the LPMB 


1 1 


1 


PARMSW2 


Second byte of parameter list 




1 


PARMCCW 


Dump the CCW 




.1 


PARMPLH 


Dump the PLH 




..1. .... 


PARMBHD 


Dump the BHD 




...1 .... 


PARMRPL 


Dump the RPL 




. . . . 1 . . . 


PARMEXCP 


Dump the EXCPAD work area 




1.. 


PARMCAT 


Dump the catalog blocks 




1. 


PARMDATA 


Dump the non-catalog blocks 




1 


PARMTHB 


Dump the THB 


2 2 


1 


PARMSW3 


Third byte of parameter list 




1... .... 


PARMOPEN 


Dump the open work area 




.1 


PARMCLOS 


Dump the close work area 




..1 


PARMCIW 


Dump the control interval split area 




...1 .... 


PARMVLST 


Dump the volume list 




.... 1... 


PARMREGS 


Dump the registers 




1.. 


PARMCECL 


Dump the control interval exclusive 
control list 




1. 


PARMODLB 


Dump the open DLBL 




1 


PARMREQR 


Dump the requester's registers 



SERVICE AIDS (...Continued) 

Obtaining Snap Dumps of Control Blocks (. . .Continued) 



Offset 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 






3 3 


1 


PARMSW4 


Fourth byte of parameter list 




1 


PARMPAMB 


l=Pointer to start dump is in parameter 

list (PARMAMBA) 

0=Pointer to start dump is in register 1 1 




..1 


PARMCCAA 


l=Pointer to CCA 
0=Pointer to AMBL 




...1 .... 


PARMRTNA 


Call the test routine 




.... 1... 


PARMHDID 


Dump the header ID 




.X.. .XXX 




Available 


4 4 


4 


PARMAMBA 


Pointer to start dump 


8 8 


4 


PARMID 


Pointer to header 


8 8 


1 


PARMIDLN 


Length of the header 


9 9 


3 


PARMIDAD 


Address of the ID 


12 C 


1 


PARMSW5 


Fifth byte of parameter list 




1 


PARMCCA 


Dump the CCA 




.1 


PARMCADL 


Dump the CCA DLBL 






PARMCADP 


Dump the CCA DADSM parameter list 






PARMCARA 


Dump the CCA record areas 






PARMCPL 


Dump the catalog parameter list 
(CTGPL) 






PARMPLDN 


Dump the CTGPL data set name 






PARMPLNN 


Dump the CTGPL new name 




1 


PARMPLPW 


Dump the CTGPL password 


13 D 


1 


PARMSW6 


Sixth byte of parameter list 




1 


PARMPLCN 


Dump the CTGPL catalog name 




.1 


PARMPLCI 


Dump the CTGPL control interval 
number 






PARMPLDL 


Dump the CTGPL file CTGDDNM field 






PARMPLWA 


Dump the CTGPL work area 






PARMCFL 


Dump the catalog field parameter list 
(CTGFL) 






PARMFLFD 


Dump the CTGFL fields 






PARMFLFN 


Dump the CTGFL field name 




x 




Available 


14 D 


1 


PARMSW7 


Seventh byte of the parameter list 




1 


PARMCFV 


Dump the catalog field vector table 
(CTGFV) 




.1 


PARMFVDL 


Dump the CTGFV file name 






PARMFVEN 


Dump the CTGFV entry name 






PARMFVKR 


Dump the CTGFV key range list 






PARMFVVL 


Dump the CTGFV volume serial list 






PARMDPDL 


Dump the DADSM parameter list DLBL 




1. 


PARMDPIO 


Dump the DADSM parameter list I/O 




1 


PARMDPWA 


Dump the DADSM parameter list work 
area 



SERVICE AIDS (...Continued) 

Obtaining Snap Dumps of Control Blocks (. . .Continued) 



Offset 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 






15 F 


1 


PARMSW8 


Eighth byte of parameter list 




1 


PARMDPSV 


Dump the DADSM parameter list save 
I/O area 




.1 


PARMCBS 


Dump the AMCBS 




..1 


PARMCAXW 


Dump the CAXWA 




...1 


PARMCXRL 


Dump the CAXWA RPL 




.... 1... 


PARMCXDR 


Dump the CAXWA DSCB read-in 
work area (DRWA) 




..... .1.. 


PARMCMSW 


Dump the CMS work area 
Available 


16 10 


8 


PARMRTNN 


Name of test routine 



Using the Test Routine Dump 

IKQVDUMP allows a phase to be called before a dump is taken to see if a dump is 
desired. (The name of the test routine is in the parameter list at field name PARMRTNN.) 
The phase can use any logic to determine whether a dump is needed, and this logic will 
override a call for a dump if it is not needed. If a is returned in register 15, the dump 
will be taken ; if register 15 holds a nonzero return, the dump will not be taken. 

The registers on entry to the test routine have the following contents : 

R2 = Pointer to the parameter list 

Rll = Caller's register 11 

R13 = Pointer to 18-word save area 

R14 = Return address of calling phase 



R15 



Address of entry point 



Using UPSI to Obtain Diagnostic Information for the VSAM Catalog 



Manipulation of the UPSI job control statement enables you to screen catalog return codes 
and obtain a snap dump, cancel a job (which causes a full dump to be taken), or simply 
continue processing. You must first use IKQVEDA to enable Snap = 0001 . Otherwise the 
UPSI statement will be inoperative. As snap 0001 uses the UPSI byte, it cannot be run when 
the user program in the partition also uses the UPSI byte. 

The purpose of this service aid is to diagnose catalog errors that occur while running any 
program that causes the VSAM catalog to execute. Typically this would be an Access 
Method Services module or a record management program you have written. 

The //UPSI nnnnnnnn job control statement must precede the //EXEC [ progname "] 
statement. If no UPSI statement is included, the default is //UPSI 000 (see type 3 request 
below). 



SERVICE AIDS (...Continued) 

Using UPSI to Obtain Diagnostic Information for the VSAM Catalog (...Continued) 



On exit from catalog management after processing, a message will be printed out 
depending on the type of UPSI bit setting you have selected. Some messages require 
a reply from the operator. The return codes in the message are obtained from 
register 15. The format is : 

** NNN, MN, RRR, FFFF, CCCCCCCCCCCCCCCC 



NNN is the return code in decimal 

MN are the last two characters of the module name which issued the 

error. This is blank in case of error code 0. 
RRR is the reason code in decimal 
FFFF is one of the following catalog management functions that had 

been processed : 

DEFC (define catalog) 

DEFA (define non-VSAM data set) 

DEFS (define space) 

DEF (define VSAM data set) 

ALT (alter) 

DELC (delete catalog) 

DELS (delete space) 

DEL (delete VSAM or non-VSAM data set) 

LSTC (list catalog) 

UPD (update or update-extend) 

LOC (locate) 

C. .C is either the control interval number in decimal or the first 16 

characters of the date set name or volume serial number in 

EBCDIC. 

If a reply is required from the system operator for certain types of requests, the operator 
must enter one of the following replies from the system console : 

• Type in SNAP to get a snap dump by means of IKQVDUMP (see 
IKQVEDA for enabling snap dumps). The message will then be 
repeated and the operator should press the END key to continue 
processing 

• Type in CANCEL to cancel the job and obtain a full dump. 

• Press the END key to resume processing. 

The following paragraphs describe the four types of UPSI settings you can use to elicit 
a message and/or to determine the degree of return code screening done : 

Type 1 UPSI Setting . If you want to obtain an operator message for all VSAM catalog 
return codes (including 0), you must include one of the following 
statements : 



// UPSI 1 1000000 No reply is required from the operator 
// UPSI 01 100000 A reply is required from the operator 



SERVICE AIDS ( Continued) 

Using UPS I to Obtain Diagnostic Information for the VSAM Catalog (. . .Continued) 



Type 2 UPS I Setting. An operator message is issued only if the return code is not 
for the following statements : 

// UPSI 10000000 No reply is required from the operator 

// UPSI 01000000 A reply is required from the operator 

Type 3 UPSI Setting. An operator message is not issued if one of the following 
conditions exists: 

1 . the Access Method Services command being processed 
was a LISTCAT and the return code is 8, or 

2. the return code is 0, 40, 68 or 160 

(these code occur during normal processing and are, 

therefore, excluded). 
If neither of these conditions exists, an operator message is 
issued for the following statements: 

// UPSI 00000000 No reply is required from the operator 

// UPSI 01 1 10000 No reply is required from the operator 

Type 4 UPSI Setting If you want an operator message on a specific return code, 
you must include the following statements : 
// UPSI OOnnnnnn nnnnnn is set to the value, in binary, 

of the code divided by 4. A reply 
is required from the operator. 



Maintaining DSCB's in the VTOC and VOL1 Labels on DASD 

A VSAM DADSM service aid has been provided to assist the programmer and operator 
in maintaining the VTOC.and VOL1 labels on DASD devices. 

The following procedures should be followed to use IKQVDU at the system console for 
such maintenance. The key difference in the three procedures is the presence, or 
absence, of a // UPSI job control statement. As IKQVDU uses the UPSIbyte, it cannot 
be run when the user program in the partition uses the UPSI byte. Steps of the procedure 
in lower case letters are typed in at the console ; steps in upper case letters are printed 
out. 

Procedure 1 Explanation 

//assgn sys000,x'cuu' cuu points at the volume you want to use. 

(press END key) 

//upsi 1 This job control statement is optional. If it is included, 

(press END key) the following events take place on the volume that was 

assigned to SYS000 : 

• The VSAM volume ownership bit and CRA TT 
pointer in the F4 DSCB are reset. 

• The entire VTOC is scratched, that is, empty 
DSCBs are written over existing Fl, F2, and F3 
DSCBs, with the exception of DSCBs that have 
names starting with the characters 'DOS', or 
'PAGE'. 



SERVICE AIDS (...Continued) 



Maintaining DSCB's in the VTOC and VOL1 Labels on DASD (. . . Continued) 



Procedure 1 (c'td) 

//upsi 1 

(press END key) 

continued 

// exec ikqvdu, size=auto 
(press END key) 



// assgn sys000,x'cuu' 
(press END key) 

//upsi 11 
(press END key) 



//exec ikqvdu, size=auto 
(press END key) 



Explanation 

• An operator authorization prompt is issued 

if the DSCB to be scratched is security 
protected 

Start Execution of the IKQVDU phase 



Explanation 

cuu points at the volume you want to use 



This job control statement is optional. If it is 
included, the following events take place on the 
volume that was assigned to SYS000 : 

• The VSAM volume ownership bit and CRA TT 
pointer in the F4 DSCB are reset. 

• The entire VTOC is scratched, that is, FO 
DSCBs are written over existing Fl, F2, and 
F3 DSCBs, with the exception of DSCBs that 
have names starting with the characters 
'DOS' or 'PAGE'. 

Start execution of the IKQVDU phase. 



// assgn sys00O,x'cuu' 
(press END key) 

//exec ikqvdu, si ze=30k 
(press END key) 

Specify function or reply 

'?' for options ready 

•? 

(press END key) 



Explanation 

cuu points at the volume you want to use 

Start execution of the IKQVDU phase. 



The character ? causes a list af the various functions 
that IKQVDU performs to be printed out at the 
system console. 



SERVICE AIDS ( . . . Continued) 

Maintaining DSCB's in the VTOC and VOL1 Labels on DASD (. . .Continued) 



To set the Volume Ownership Flag 

To set the CRA Pointer 

To reset the Volume Ownership Flag and 

CRA Pointer 

To set the Security Flag in A F 1 DSCB 

To reset the Security Flag in A Fl DSCB 

To remove a DSCB from the VTOC 

To rename a DSCB 

To allocate a DSCB 

To reinitiate Processing 

To alter or display a DASD VOL1 label 

To terminate Processing 
Ready 



reply 'Set Ownership' 
reply 'Set Ownership' 

reply 'Reset Ownership 1 or 'Reset CRA 1 

reply "Set Security' 

reply 'Reset Security' 

reply 'Scratch' 

reply 'Rename' 

reply 'Allocate' 

reply 'Restart' 

reply 'CLIP LABEL=SER=N. .N' or 

'CLIP LABEL=DISPLAY' 
reply 'End' 



You can avoid printing out this list of functions simply by specifying the functior 
you wish as follows : 

Procedure Explanation 



Set Ownership 
(press END Key) 



Reset CRA or Reset Ownership 



Causes the VSAM ownership bit to be 
set in the F4 DSCB and optionally 
allows the user to set the CRA TT pointer. 

Causes the VSAM ownership bit and 
CRA TT pointer to be reset in the F4 
DSCB 



Set Security 
(press END key) 



Causes the security bit to be set in the 
Fl DSCB 

When the console responds with ENTER 
DSN, reply with the data set name of 
the DSCB to be modified. 



Reset Security 
(press END key) 



Causes the security bit in the F 1 DSCB 
to be reset. 

When the console responds with ENTER 
DSN, reply with the data set name of the- 
DSCB to be modified. 



Scratch DSN=DSNAME 
(press END key) 



Scratch VTOC 
(press END key) 



Causes the DSCB with the specified 
data set name to be scratched. 

Causes the entire VTOC to be scratched 
with the exception of data set names 
starting with the characters 'DOS' and 
'PAGE'. In addition, an operator- 
authorization prompt will be issued if the 
DSCB is security-protected or describes 
a catalog. 



SERVICE AIDS (...Continued) 



Maintaining DSCB's in the VTOC and VOLT Labels on DASD (.. . Continued) 



Explanation 



Rename 

(press END key) 



Causes the DSNAME portion of the F 1 

DSCB to be changed 

When the console responds with ENTER 

OLD DSN, reply with the data set name 

of the DSCB to be changed. 

When the console responds with ENTER 

NEW DSN, reply with the new data 

set name. 



Allocate 
(press END key) 



Causes a new DSCB to be created and 

written in the VTOC. In order to 

utilize this function, a DLBL/EXTENT 

[ob control statement must be provided 

(see 'DOS/VS System Control Statements 

GC33-5376'). 

When the console responds with ENTER 

FILEID, reply with the same file 

identification as that in the DLBL/EXTENT 

statement referred to above. 

When the console responds with ENTER 

NEW DSN, reply with the data set name 

of the data set to be created. 

When the console responds with DO YOU 

WISH TO SECURITY PROTECT THIS DATA 

SET? reply YES or NO. A reply of YES 

causes the data security bit to be set in 

Fl DSCB. A reply of NO causes the data 

security bit to be reset in the Fl DSCB. 



Restart 

(press END key) 



CLIP LABEL=OISPLAY 
(press END key) 



CLIP LABEL=SER=N..N 
(press END key) 



Causes processing to be reinitiated with 
a READY prompt. This keyword can be 
used as a response to any operator prompt. 

Causes the volume serial number to be 
displayed on the system console. 

Causes the existing volume serial number 
to be changed to the one specified as 
N..N. 



End 

(Press END key) 



Causes processing to terminate. 



SERVICE AIDS (...Continued) 

Maintaining DSCB's in the VTOC and VOL1 Labels on DASD (. . .Continued) 

If an error occurs during execution of IKQVDU, 

**ERROR** DADSM RETURN CODE IS nnn 

prints out on the system console. The following list shows the message code 
(nnn) and associated message that appears, for example, 

**ERROR** DADSM RETURN CODE IS 020 VTOC FULL 



nnn 


Message 


004 


I/O error while reading volume label 


008 


Volume not mounted 


012 


I/O error on VTOC 


016 


Duplicate name on volume 


020 


VTOC full 


024 


Extent overlaps expired file 


028 


Extent overlaps unexpired file 


032 


Extent overlaps protected unexpired file 


036 


Extent overlaps VTOC 


040 


Required extents missing 


044 


DSCB not found 


056 


Extent overlaps protected expired file 


064 


GETVIS failure encountered 


072 


CDLOAD failure encountered 


080 


Overlap among new extents 


Loadi 


ng a VSAM Phase or a program You Have Written 



If you want to load and transfer control to and from a selected VSAM phase or a 
program you have written, you can use B-trans?ent SSBCVS03 without destroying 
any registers in the following calling sequence : 

LA 1,PARMLIST 
SVC 2 



PARMLIST DC CL8'$$BCVS03' B Transient 

RTNNAME DC CL8'XXXXXXXX' Name of phase or program you have 

written 
USERLIST DC Parameterlist for 'XXXXXXXX' 

When control is received by 'XXXXXXXX', the registers have the following 
contents : 

R0 = Address of a work area (the size of the work area is specified 

by a halfword at offset 4 of 'XXXXXXXX' phase 
Rl = Pointer to user's parameter list (USERLIST) 
R2-13= Remain the same as they were when SVC 2 was issued 
R14 = Return address of calling module 
R15 = Address of entry point in 'XXXXXXXX' 

Control is returned from 'XXXXXXXX' by a BR 14 instruction. 
111-84 



CHAPTER IV 

MODEL 20 EMULATOR 




M 20 EMULATOR 



Flow of initialization 



DOS SUPERVISOR 



Performs Initialization for : 
Communication Region 
. Buffers 
. CCB's 

- Issues STXITS for : 

Operator Communication 
. Abnormal EOJ 
. Program Check 

- Loads 'EMUNAME H' 



Selects Communication Functions 
(Control card analysis) 



Reads and processes 
Emulator Control Statements 
- Updates CRI and EDB's 



Checks validity of assigned 
devices 



Selects Communication Functions 
(Loading of EMUNAME U) 



Loads 'EMUNAME U' 



Prepares for ussuing DIL 20 



Beginning of Emulation 

Loading of M20 emulated'storage 



M 20 EMU LATOR (...Continued) 



Emulator Layout 



CCW and buffer for read ahead option on a 
2501 (160 bytes) 



Error recovery buffer on o 
2540 (81 bytes) 



CCW and buffer for printer 
(132 bytes) 



Card reader buffer 
(160 bytes) 



Emulated Model 20 storage (1) 
(from 4K to 32K, minus 144 bytes) 



EDBs (2) 



CCBs and buffers for communications 
routines 



Communication region (3) 



CCBs and buffers for communications 
routines 



Fixed communication region data areas 



Emulator routines 



IISCP, IISCPS, IISDB, IISDD, IISDF, 
IISDFED, IISDI, IISDK, USED, IISHC, 
IISTD, IISTP, IISTR. 

Optional 



emunameU (4) emunameH (4) 

IISCM IISHF 

IISCMS 

IISDI 

IISD2 

IISD3 

IISD4 

IISDE 

I IS ID 

IISMD2 

IISMF 

IISPD2 

I IS IN (last routine) 



M 20 EMULATOR ( Continued) 
Emulator Layout (..Continued) 



Device independence buffers (optional) 
Tape read ahead buffers (optional) 


1 


IISEI is loaded here and overlays 
itself at end of initialization 


2 


EDBs are also loaded in the disk area 
of the communication region when disk 
and device independence are not 
included in the emulator 


3 


The communications region is loaded 
and moved up to a 256-byte boundary 
by IISEI at initialization 


4 


The phases emunameU and emunameH 
overlay one another 



COMMUNICATION REGION CR1 



Dec Hex 




12 


C 


16 


10 


20 


14 


24 


18 


28 


1C 


32 


20 


36 


24 


40 


28 


44 


2C 


48 


30 


56 


38 


60 


3C 


64 


40 


68 


44 


84 


54 


88 


58 


92 


5C 


116 


74 


148 


94 


152 


98 


156 


9C 



CRBYTE12 

1st 2 bytes M20 inst 



CR6000 

base reg ss inst 



CR5000 

base reg ss Inst 



CRDIL 

EA 20 3000 3100 DIL 'instruction 



CRM20PSW 
current M20 PSW 



CRMAPORG 

A (M20 address 0) relocation factor 



CRSIZE20 

M20 core size - 1 



CRPEADD 
A(IISCPPE) 



CRDCNTRT 
A(IISNEIR) 



CRM20INT 
A(IISINTIR) 



CRDILCNT 
current value 



CRIRCAL CRPECC20 

current inst when error occurs M20 error code 



CRINTFLG 
pending interrupts 



CRDFADD 
A(IISDFED) 



CRDKBFWK CRDKBFAC CRDKOLDB 



.CRSAVM20 

M20 register save area 



CRMAPEND 

A (last byte of emulated storage) 



CRLASTFW 

A (last full word of emulated storage) CRMAPEND-3 



CRLSTCCW 

A (last possible M20 CCW) CRMAPEND-5 



• For further explanation : see end of the table 
IV -04 



COMMUNICATION REGION CR1 (...Continued) 



Dec 


Hex 
AO 

CO 

CC 

DO 

DC 
E0 

E4 
E8 

EC 

F0 

F4 

F8 

FC 
100 

1FC 

200 

234 
238 

280 
288 
290 










160 


CRDEVTAB 
-A (EDB of device to be emulated) -_ 

9 


192 

204 


CRINTCOD 

M20 interrupt code table 


208 
220 


CREDBDIS 

displacement into CRDEVTAB 


224 


CRDELADD 

A (IISTDDI) delay routine 


228 


CRIOACT 

o 


CREMUFLG ICREMUIND 

• 1 • 


232 


CRSUBMOD 

M20 model 

e 


CRSKIPSW 

• 


CRLSTCNT 

last CRD ILCNT- before DIL 


236 


CRHFPSW 
previous M20 PSW 


240 


CRCMADD 
A (IISCM) 


244 


CRSIOTPE 
A(IISTP) 


248 


CRSIODSK 
A(IISDK) 


252 


not used 


256 
508 


CRDISPTB 

used by DIL : 1 byte entry for each M20 inst byte configuration. 
I Index to CROPCODE table ; 


512 


CROPCODE 
- A(specific emulation routine) 13 full words - 


564 


CREDFADD 
A(IISEDF) 


568 


CRSAVCPU 
.save area for STXIT macro (program check while executing M20_ 
-instruction) 


640 


CRHFCWPK 

CCVV for comm PK routines 


648 


CRCCWRD 

CCW for read card 


656 


CRCCWPN 

CCW for punch card 



o For further explanation : see end of the table 
IV -05 



COMMUN ICATION REGION CR1 (..Continued) 



Dec 


Hex 
298 

2A0 

2A4 

2A8 

2AC 

2B0 
2B4 

2B8 
2BC 

2C0 
2C4 

2C8 
2CC 
2D0 
2D4 
2D8 
2DC 
2E0 
2E4 
2E8 

2F8 
2FC 










664 


CRCCWPR 
CCW for print 


672 


CRCCWWCP 

A(chain for M20 MFCM write card)' in CR2 


676 


CRCCWPKP 

A(chain for M20 PK ops) located in CR2 


680 


CRCCWTP 

A(chain for M20 tape ops) located in CR2 


684 


CRDIADD 
A(IISDB) 


688 


CRHFLAG1 


CRHFLAG2 

a 


CRHFLAG3 

o 


CRHFLAG4 


692 


CRHFMSGN 
msg number 


CRHFINDP 
A(IISFFIN) 


CRHFCMDP 
A(IISFFCMR) 


CRHFBRTB 

• 


696 


CRHFTYMG 


CRHFCX 


700 


translation table char A-B to hex A-B 


CRHFDISP 

a 


704 


CRHFFCAD 
AO'FUNCTION-table) 


708 


CRHFASAD 

A(STOP address) o 


CRHFMSGH 

• 


CRCHKDSK 

9 


712 


CRHFSCRN 

screening mask for the latest msg issued 


716 


CRHFPBFA 

A(print buffer for comm routines) 


720 


CRHFRBFA 

A(read buffer for comm routines) 


724 


CRHFCCRA 

A(IISHCCF) comm control routines 


728 


CRHFRETA 

A(IISHCEIR) communications : exit routine 


732 


CRHFIKAD 

A(IISHCIR) S/370 interrupt key routine 


736 


CRHFTRAD 
A(IISHF) 


740 


CRHFCCBA 

A(DOS CCB's for communication routines) 


744 


CRHFXC 

translation table hexa A-F to char A*-F 


760 


CRHFRTCD 

comm routines return code from B transient 


764 


CRHFOVLH 

communication routine phase name 



• For further explanation : see end of the table 



COMMUNICATION REGION CR1 (.. .Continued) 



Dec Hex 

772 304 

780 30C 

784 310 

788 314 

792 318 

796 31 C 

800 320 

804 324 

808 328 

812 32C 

816 330 

820 334 

824 338 

828 33C 

832 340 

876 36C 

880 370 

884 374 

888 378 

892 37C 

896 380 

900 384 



CRHFOVLU 

unit record routir 



CRHFERTP 

error type for IISHFMSG 



CRDTFDI , , 

.,,.„,,, r . . . , , . used by comm. 

AlDTFD for device independence routines) . 



CRD IF STB 

A(first buffer for device independence) 



CRDIBUFL 

device independence buffer size 



CRDIBUFN 

A(second buffer for device independence) 



CRDIHBUF 

last byte of device independence buffers 



CRDIEDB 

A(EDB for device independence) 



CRDICa 

A(M20 carriage control tape) 



CRDIRD 

A(M20 read routine) 



CRDIPN 

A(M20 punch routine) 



CRDIPT 

A(M20 printer routine) 



CRDIER 

A(M20 error routine) 



XIO displacement byte table 



CRD I CM 

A(IISDI) I/O decode 



CRDICMEN 
A(IISIDIEN) I/O decode 



CRDIMTSD 

A(IISTD) DOS tape/disk module 



CRDIEDBC 

A(EDB control card reader) 



CRD I LOAD 
A(M20 IPL) 



CRLNKSAV 

return to caller after IISINEIR 



o For further explanation : see end of the table 
IV -07 



COMMUNICATION REGION CR1 (...Cont'd) 



Dec Hex 
904 388 



1040 410 

1048 418 

1052 41C 

1056 420 

1060 424 

1084 43C 

1088 440 

1092 444 

1096 448 

1100 44C 



1310 51E 

1318 526 

1326 52E 

1334 536 



CRSAVERR 

STXIT OC save area 



EDB active list (16 words) 
CREDBACT 



I/O op in overlap or time sharing mode 



CRBINDEL 

last card delimiter read binary 



CRHFTRAC 

A(IISTR) trace routine 



CR20CCW1 

A(first M20 CCW used by IISTP) 



CRCARDEL 

last card character in DC of M20 CPU n 



d or EC control statement 



CRCHKCNT 

Record and file count for checkpoint 



CRDATADD 

A(M20 tape CCW data address) used by IISTP 



CRSAVCCB 

A(CCW In CCB) used by IISTP 



CRSAVER 

area for count/ file update used by IISTP 



CRCCWCNT 

M20 CCW record count used by IISTP 



Table of indexes into CRXIOTAB 
-LCRXIODIS 

1 entry for each DAFS 



Table of indexis into CRCIOTAB 

CRTIODIS 

1 entry for each DAFS 



Table of indexes into CRTIOTAB 
^CRCIODIS 

1 entry for each DAFS 



CRERR4 

A(CPU error code 4 roul 



CRERR5 

A(CPU error code 5 roul 



CRERR6 

A(CPU error code 6 roul 



CRERR7 

A(CPU error code 7 roul 



• For further explanal 
IV 



ne) 



ne) 



ine) 



ion : see end of the table. 



COMMUNICATION REGION CR1 (...Cont'd) 



Dec Hex 
1338 53A 



1380 564 

1384 568 

1388 56C 

1392 570 

1396 574 

1400 578 

1404 57C 

1408 580 

1412 584 

1416 588 

1420 58C 

1422 590 

1428 594 

1432 598 

1436 59C 

1440 5A0 

1444 5A4 

1448 5A8 

1452 5AC 











CRERROR 

A(routine handling all M20 program error stops) 


CREMUBGN 

A(first emulator byte) 


CREMUEND 

A(last emulator byte) 


CRDILADD 

reserved for hardware 


CRDKSTAS 

1st sector in command 


static 

CRDKLERF 

last error free sector 


CRDKOBJS 

EXCP target sector 


CRDKEOC 

end of cylinder sector 


dynamic 

CRDKLDEF 

last error free sector 


CRDKECD 

end of command sector 


CRDKRSCT 
residual count 


CRDKLTCT 

last count used (head/record) 


CRDKLSTO |CRDKFAST 
disk unit last op 
1 


CRDKEFDT 

no error free data sectors 


no bytes in sector in error 
CRDKLBDT 


CRDKCCHR 

field used by ID 


CRDKCCHR 

.... conversion routine 


not used 


CRDKIDPC/CRDKHTSR 
A(S/370 identifier) for partial 


case - Conversion routine - 

• 


CRDKNSSK 
S/370 seek field 




CRDKCCHE 
cyl. number 


CRDKHHHE 
head number 


CRDKHRE 
record nbr 


CRDKINDI 


CRDKM20 

• 


CRDKEXCT 

» 


CRDKEXC1 

• 


CRDKEXC2 

• 


CRDKDFDB 

o 


CRDKDDDB 

• 


CRDKDSCT 


not used 

• 


CRDKCDTB 

A(chain descriptor table) 


CRDKSKTB 
A(skeleton table) 


CRDKMOTB 
A(modifier table) 



• For further explanation : see end of the table 
IV -09 



COMMUNICATION REGION CR1 (...Cont'd) 





Hex 
5B0 

5B4 

5B8 

5BC 

5C0 

5C4 

5C8 

5CC 

5D0 

5D4 

5D8 

5DC 
5E0 
5E4 
5E8 








Dec 


1 1 




1456 


CRDKCCWA 
A(S/370 CCW area) 


1460 


CRDKKYAD 

A(S/370 key buffer for extra read) 


1464 


CRDKDAAS 

A data buffer for scan) 


1468 


CRDKIDTB 

A(S/370 identifiers table) except for scan 


1472 


CRDKIDAS 

A(S/370 identifiers table) for scan 


1476 


CRDKDK 
A(IISDK) 


1480 


CRDKDF 
A(IISDF) 


1484 


CRDKDD 
A(I!SDD) DOS 


1488 


CRDKCTLH 

M20 cnt field length 


CRDKSCLH 

data sector length 


1492 


CRDKBASE 

save area for base register 


1496 


CRDKTOTS no of sectors 
given by DOS extents 


CRTRSKPS 

• 


CRPERF 


1500 


CRXIOTAB (variable length) 
A(DII instruction) 


1504 


CRPKADD A(IISDE) 

if PK is emulated, otherwaise CRDIL 


1508 


CRTDADD A(IISTDXIO) 

if Tape/disk is emulated, otherwise CRDIL 


1512 


A(routines used to emulate M20 XIO ops) 
~% bytes entry by emulated device 




CRCIOTAB 

A(routines to emulate M20 CIO ops) 




.CRTIOTAB 

A(rcutines to emulate M20 TIO ops) 



For further explanation : see next pages 



COMMUNICATION REGION FLAG BYTES LAYOUT 



Disp 


acement 


Field name 


Bytes 


Field description 


Dec 


Hex 


38 


26 


CRINTFLAG 

Byte 1 
CRURINT 

Byte 2 
CRTDPK 


1 

.1 

1. 

1 

1 

.1 

.... '.A. 
1 


Flags for pending M20 interruptions 

2501 card read 
2520/2560 card read 
1403/2203 print 
2560 card punch 
1442 card punch 
2560 card print 
2520 card punch 
not used 

tape 
•disk 

2152 read 

2152 write or carrier return 
2152 inquiry request 
CC2 interrupt request 
not used 
not used 


160 


A0 


CRDEVTAB 




Addresses of EDB's of M20 devices that 
can be emulated, as follows : 






CR2501AD 


1- 4 


2501 card reader 






CR1442AD 


5- 7 


1442 card punch 






CRPRINAD 


8-12 


1403 or 2203 printer 






CR2520AD 


13-16 


2520 card read-punch or card punch 






CR2560BD 


17-20 


2560 MFCM 






CR2152AD 


21-24 


2152 printer-keyboard 






CRIOCAD 


25-28 


I/O channel 






CRSCAD 


29-32 


Storage control 


228 


E4 


CRIOACT 
Byte 1 


1 

.1 


2501 card read 

2520/2560 card read ^ $ Q 
1403/2203 print % S O 
2560 punch % ° £ 
1442 punch 5"2?^ 


















2560 card print _. k" o 








1. 


2520 punch -£ - 3 








1 


not used q_ a" « 






Byte 2 


1 

.1 

1. 

1 


5' S" 5" 
tape 9 =T"o 
disk § & 
2152 read |f 8 
2152 write or carrier return Q 
2152 inquiry request 2 
CC2 interrupt request ^ 
not used 5> 
not used O 



COMMUNICATION REGION F LAG BYTES LAYOUT (. , .Cont'd) 



Displacement 



Dec 



Bytes 



Field description 



CREMUFLG 



CRCCFLAG 

CRERRFLG 

CREBDIN 

CRDCNTIN 

CRWAITIO 

CRHFOUT 
CRETURN 
CREIRBIT 

CREMUIND 



CRDELAYT 

CRDELAYD 

CROVLUR 

CROVLTP 

CROVLDK 

CRDELAYF 
CRDELAYC 



CRHFAS 

CRHFHPR 

CRHFPE 

CRHFEM 

CRHFSS 

CRHFTR 

CRHFIK 



..1 

...1 .... 

1... 

1.. 

1. 



xxxx xxxx 



1... 
.1.. 



Emulator program indicators 

M20 PSW condition code con be modi- 
fied by current M20 instruction 
Error was detected while decoding 
current M20 instruction 
An EDB is to be inserted in CREDBACT 
by IISINEIR 

A new DILCNT must be stored at 
CRDILCNT 

IISINEIR must complete all outstanding 
I/O operations 

IISINEIR must return to comm. routines 
IISINEIR must return to caller 
IISINEIR has been called by an 
emulator routine 

Emulator program indicators 

IISINEIR must call IISTDDL to perform 

tape operation 

IISINEIR must call IISTDDL to perform 

disk operations 

Unit record I/O operation must be 

treated in overlap mode 

Tape I/O operation must be treated 

in overlap mode 

Disk I/O operation must be treated in 

overlap mode 

Delay ON must be performed by IISTDDL 

Both a tape and a disk operation have 

been delayed 

M20 time sharing switch is being 

emulated. 

Hexadecimal F5 if M20 Submodel 5 or 6 
is being emulated 

Skip indicator for trace 

Calls for processing : 

M20 address stop 

M20 HPR 

M20 program error 

Emulator message 

M20 instruction step 

Trace to be made of all M20 

instructions executed 

Interrupt key 



COMMUNICATION REGION FLAG BYTES LAYOUT (...Cont'd) 



Displacement 


Field name 


Bytes 


Field description 


Dec 


Hex 


689 


2B1 


CRHFLAG2 

CRHFASP 

CRHFSYNP 

CRHFEMP 

CRHFSSP 

CRHFIKP 


1 

.1 

..1 

...1 .... 
.... 1... 


Calls being processed : 

M20 address stop 

M20 HPR or program error 

Emulator message 

M20 instruction step 

interrupt key 


690 


2B2 


CRHFLAG3 

CRHFICC 

CRFFDCC 

CRHFINIT 

CRHFCMP 

CRHFCHN 

CRHFTC 

CRHFTRCE 

CRHECIM 

CRHFICER 


1 

.1 

..1 

...1 .... 
.... 1... 

1.. 

1. 

1 


Indicates : 

Initialization control card 

Dynamic control card 

IISHFIN called 

IISHFCMR called 

Control statement chaining 

Count option for debugging 

Trace option for debugging 

M20 decimal operation 

Error in initialization control card 


691 


2B3 


CRHFLAG4 

CRHFEMT 
CRHFERSW 


1 

.1 


Indicates : 

IISHF has been loaded 

Error has been detected in a control 

atatement keyword or operands 






CRHFDF 


..11 .... 


Mask for emulator on M20 trace 






CRHFDFTT 


..1 


Emulator contains routines for trace 






CRHFDF IO 


...1 .... 


Emulator contains routines to execute 
keyword IOT of control statement DF 






CRHFTASW 


.... 1... 


M20 trace or address stop 






CRHFSTSW 


1.. 


M20 instruction step 






CRHFLC 


1. 


2501 last card has been read 






CRHFIKAC 


] 


M20 INTERRUPT key has been pressed 
during execution of IISINEIR 


694 


2B6 


CRHFCMDP 


xxxx xxxx 


Displacement in HFUNTAB of IISHFIN 


695 


2B7 


CRHFBRTB 


xxxx xxxx 


B-transient area 


696 


2B8 


CRHFTYMG 


.1 


Type of message : 
Information 


CRHFINF 






CRHFDEC 


..1 


Decision 






CRHFACT 


...1 


Action 






CRHFAEOJ 


.... 1... 


Automatic End Of Job 






CRHFERMS 


1. 


Error 






CRHFCONT 


1 


Continuation 


703 


2BF 


CRHFDISP 


xxxx xxxx 


Displacement of entry point of a control 
statement routine in HFUNTAB 


708 


2C4 


CRHFASAD 


xxxx xxxx 
xxxx xxxx 


In address stop mode, address of M20 byte 
at which emulator is to stop 


710 


2C6 


CRHFMSGH 


xxxx xxxx 


Number of the latest decision or action 
message issued 



COMMUNICATION REGION FLAG BYTES LAYOUT (. ...Cont'd) 



Displacement 


Field name 


Bytes 


Field description 


Dec 


Hex 


711 


2C7 


CRCHKDSK 


xxxx xxxx 


Indicates whether checkpoint file is open 


782 


30E 


CRINDIMP 




Device independence switches 






CRDISCFL 


X'80' 


Screening flag for D. 1. initialization 






CRDIGEN 


X'40'- 


Device independence option generated 






CRDIGENT 


X'20' 


Device independence option for tapes 






CRDIGEND 


X'10' 


Device independence option for disks 






CRD 1 ACT 


X'08' 


Device independence option active 






CRDIMESG 


X'04" 


Device indep.inf. message switch 






CRDICCTM 


X'02' 


Device indep. two messages witch 






CRDINTMG 


X'Ol' 


Device indep. initialization message 


808 


328 


CRDIERR 


xxxx xxxx 


Error return code 


809 


329 


CRDICD 




Buffer Allocation/Release flag 






CRDIALLC 


X'80' 


Allocation request 






CRD IRE LS 


X'40' 


Release request 






CRDIRCLC 


X'20' 


Dl off command 






CRDIRDIN 


X'10' 


RCC/INIT command 






CRDILD 


X'08' 


LD command 






CRD IE O J 


X'04' 


EOJ command 






CRDIRET 


X'02' 


Return to caller via link reg. 


810 


32A 


CRD IF LAG 




Dl working switches 






CRD1FST 


X'80' 


1st time switch for printer 






CRD 1 CHAN 


X'40* 


No hole found in carriage control tape 






CRDIFSW 


X'20' 


Buffer allocation message switch 






CRDIRDM 


X'10' 


Read control cards in Dl mode 






CRDIRPK 


X'08' 


Read from PK at initialization 






CRDIOPN 


X'04' 


OPEN Issued for DTFDI 


1409 


581 


CRDKFAST 




Indicator for performance 






CRDKVRiF 


X'80' 


Verify option ON 






CRDKHTRY 


X'40' 


Hit occurred on last command 






CRDKSCAN 


X'20' 


Scan 6 SCTRS option ON 






CRDKRDBF 


X ! 10' 


Use buffer for read option ON 






CRDKMVDD 


X'08' 


Read and move SCTRS to M20 


1420 
1435 


58C 
59B 


CRDKHTSR 




Hit sector adar in scan buffer 
M20 indicators for disk 


CRDKINDI 






CRDKEEOC 


X'80' 


End of cylinder 






CRDKEDTA 


X'40' 


Data address error 






CRDKECTA 


X'20' 


Count address error 






CRDKEDDC 


X'10' 


Data check in data area 






CRDKEKDC 


X'08' 


Data check in count area 






CRDKSHIT 


X'04' 


Scan hit 






CRDKSNEQ 


X'02' 


LE or HE scan hit 


1436 


59C 


CRDKM20 




M20 control byte . Class of operation 






CRDKCTRL 


X'80' 


Control operation 






CRDKC10 


X'40' 


10 sector max operation 






CRDKC100 


X'20' 


100 sectors max operation 






CRDKSCCL 


X'10' 


Scan class 






CRDKCTDT 


X'08' 


Count and data class 






CRDKDTCL 


X'04' 


Data class 



COMMUNICATION REGION FLAG BYTES LAYOUT (. . . .Cont'd) 



Displacement- 


Field name 


bytes 


Field description 


Dec 


Hex 


1437 


59D 


CRDKEXCT 


X'OT 


Control byte for building CCW's 
Scan equal 


CRDKSCEQ 






CRDKUSH 


X'02' 


Unshuffling to make 






CRDKWRCL 


X'09' 


Write class 






CRDKVRCL 


X'OO 


Verify class 






CRDKCTDA 


X'10' 


Count and data class 






CRDKSHU 


X'18' 


Shuffling to make 






CRDKINCA 


X'AO' 


Increasing address command 






CRDKRDCD 


X'B2' 


Read count and data 






CRDKFFKY 


X'CO' 


S/370 search command with X'FF' in 
key area 


1438 


59E 


CRDKEXC1 


X'80' 


Control byte 1 of HSDF 
First EXCP loop 


CRDKLP1 






CRDKLSLP 


X'40' 


Last EXCP loop 






CRDKEXT2 


X'20' 


Extent 2 used 






CRDKRCSC 


X'08' 


Read count successful 






CRDKEXRD 


X'04' 


Extra read requested . Hit for LE or HE 






CRDKWAIT 


X'02' 


Wait requested 






CRDKNSID 


X'01 ' 


Indicator for identifier conversion 


1439 


59F 


CRDKEXC2 


X'80' 


Control byte 2 of IISDF 
Delay routine called 


CRDKDELY 






CRDKBDEX 


X'40' 


Bad extents information 






CRDKPART 


X'20' 


Data partially processed 






CRDKIOOP 


X'10' 


DOS I/O indicator 






CRDKEQUA 


X'08' 


Equality in compare routine 






CRDKHNEQ 


X'04' 


Hit not equal in compare routine 






CRDKINID 


X'02' 


Increasing ID addresses 






CRD Kl EXT 


X'01' 


One extent already given 


1440 


5A0 


CRDKDFDB 




S/370 CCW control dispatching byte 






CRDKDFCW 


X'80' 


Caller wants CCW control 






CRDKDFID 


X'40' 


Caller wants ID conversion 


1441 


5A1 


CRDKDDDB 




IISDD control byte 






CRDKDDEX 


X'80' 


Caller wants EXCP 






CRDKDDOP 


X'40' 


Caller wants OPEN 


1442 


5A2 


CRDKDSCT 


xxxx xxxx 


Description count for CCW builder 


1498 


5DA 


CRTRSKPS 


xxxx xxxx 


Trace of first skip to channel 1 





EDB LAYOUT 



Dec Hex 




12 


C 


16 


10 


20 


14 


24 


18 








4 


4 


8 


8 


12 


C 


16 


10 


20 


14 


24 


18 








4 


4 



12 C 
16 10 

20 14 



2501/2520/2560 Card Reader 






l l l 


EDBCTLBK 
A(DOS CCB) 


EDBINT 

A(end of operation routine) 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBSS 
Select stacker 


EDBDATAL 
Data count 


not used 


EDBRDBUF 
A(read card buffer) 


EDBDATAD 

Data address for read operation 



2520/2560 Card Read Punch 



EDBCTLBK 
A(DOS CCB) 



EDBINT 

A(end of operatic 



i routine) 



EDBCNTC 

Current DILCOUNT 



EDBDATAL 
Data count 



EDBINTMK 
Int. mask 



EDBCNTS 

Standard DILCOUNT value 



EDBSS 
Select stacker 



EDBRDBUF 

A(read card buffer) 



EDBDATAD 

Data address for read operation 



1442 Card Punch 



EDBCTLBK 
A(DOS CCB) 


EDBINT 

A(end of operation routine) 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBSS 
Select stacker 


EDBPNBUF* 

Save area for ERP(address) 


EDBPNCNT* 
Count for ERP 


not used* 



*When emulated by 2540 Card Read Punch 
t See Flag bytes layout 



EDB LAYOUT (....Cont'd) 



12 


C 


16 


10 


20 


14 


24 


18 


28 


1C 


32 


20 








4 


4 



12 C 

16 10 

20 14 

24 18 

28 1C 

32 20 

36 24 

40 28 

44 2C 



EDBCTLBK 
A(DOS CCB) 



EDB1NT 

A(end of operation routine) 



EDBCNTC 

Current D1LCOUNT 



EDBINTMK 
Int. mask 



EDBDATAL 
Data count 



EDBCNTS 

Standard DILCOUNT value 



EDBSSF2 
SS feed2 



EDBSSF1 
SSfeedl 



EDBSSPN 
SS punch 



EDBRDBUF 

A(read card buffer) 



EDBDATAD 

Data address for read operatic 



EDBSTAT** 
Card positic 



EDBWCHSL**| 
Head selection 



EDBWCHD** 
Head selection 



Storage Control 




** MFCM with Print card 


EDBCTLBK 
A(DTFPH) 


EDBINT 

A(end of operation routine) 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


ED3TYPE 

e 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBFLAG2 

e 


EDBLONG 
Length of EDB 




EDBCSW 

CSW for the device 


not used 


EDBSENSE 






Sense status 


EDBMXCL 
Max cyl no 


EDBHDSEL 
Last head 


EDBSKCL 
Last seek 






EDBEXT1 
Extent table nr 1 


EDBRECTK 
S/370 records/ 
track 


EDBEXT2 
Extent table nr 


2 








EDBTKCYL 
S/370 track/ 
cyl 


not used 



o See Flag bytes layout 

IV - 17 



EDB LAYOUT (....Cont'd) 





Hex 


4 

8 

C 

10 

14 

18 

1C 


4 
8 
C 
10 


4 
8 
C 


I/O Channel 








Dec 


1 1 





EDBCTLBK 
A(DOS CCB) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBFLAG2 

• 


16 


EDB LONG 
Length of EDB 




20 


EDBCSW 

CSW for the device 


24 


EDBRECRD 
Record counter 


EDBTM 
File counter 


28 


EDBSVREC 

Record and file counter when L 


C in CCB 




1403/2203 Printer 







EDBCTLBK 
A(DOS CCB) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

-• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBELOP 
Delay code 


16 


EDBLENG 
Line length 


EDBRESPA 
Residual space 


not used 




2152 Printer Keyboard 







EDBCTLBK 
A(DOSCCB) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard D 1 LCOUNT va lue ; 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBNASAL 

ASA carrier 

return 



» See Flag bytes layout 



EDB LAYOUT (....Cont'd) 

Extension for Device Independence 



Dec 




Hex 




12 


C 


16 


10 


20 


14 


24 


18 


28 


1C 


32 


20 


36 


24 


40 


28 



EDBBLKSZ 
Block size 



EDBBLKF 
Blocking factor 



EDBCCTLG 

Length carriage ctl tape 



EDBCTID 

Index of carriage tape image 



EDBDTFPT 
A(active DTF) 



EDBDTFIT 
A(input tape DTF) 



EDBDTFOT 
A(output tape DTF) 



EDBDTFID 
A(input disk DTF) 



EDBDTFOD 
A(output disk DTF) 



EDBBFADD 

A(output device independence buffer) 



EDBIOREG 

A(last logical record in buffer) 



EDBDIASA 

ASA control character 



9 See Flag bytes layout 



EDB FLAGBYTES LAYOUT 



Displacement 


Field name 


Bytes 


Field description 


Dec Hex 


12 C 


EDBTYPE 




Definition of the M20 device: 






EDBSC 


1111 1111 


Disk 






EDB 1442 


I 


1442 Card Punch 






EDB2501 


.1 


2501 Card Reader 






EDB2520 


..1 


2520 Card Read Punch 






EDB2520P 




2520 Card Punch 






EDBMFCM1 


.... 1... 


2560 MFCM (feed 1) 






EDBMFCM2 


1.. 


2560 MFCM (feed 2) 






EDBPRINT 


1. 


1403/2203 Printer 






EDBPK 


1 


2152 Printer Keyboard 






EDBIDC 




Tape 




14 E 


EDBFLAG 
EDBLSTCP 




M20 indicators for: 




Last card 


NO 




EDBFEED 


.1 


Previous M20 operation included 
a feed for 2520 Card Read Punch 


o 




EDBTODEV 


..i 


2520 Card Read Punch is emulated 


I 








by 3525 Card Punch; or 2560 








MFCM is emulated by 3525 Card 


2 








Punch 










o 




ED3DIFIR 


...1 .... 


Firstrequest to execute CIO SS in- 
struction during device independence 


i 

^3 




EDBMESG 


1. 


Pending message 


a. 




EDBDI 
EDBTODEV 


..1 


EDB includes device independence 


2 


1442/2520 Card Punch is emulated 


5 








on 2520/3525 Card Punch 




EDBPNER 


1.. 


1442/2520 punch error 






EDBMESG 


1. 


Pending message 


o 




EDBDI 
EDBLSTCD 




EDB includes device independence 


n 


Last card 






EDBFEED 


.1 


Previous M20 operation included 
a feed for 2520 Card Read Punch 






EDBTODEV 


..1 


2520 Card Read Punch is emulated 
by 3525 Card Punch; or 2560 
MFCM is emulated by 3525 


§ 




EDBPNFIR 


...1 .... 


First request for punch or punch- 








feed on 3505 Card Reader 


2 




EDBWCFIR 


.... 1... 


First request for write card on 3505 










Card Reader 




EDBPNER 


1.. 


Punch error 






EDBMESG 


1. 


Pending message 






EDBDI 
EDBCH9 




EDB includes device independence 




Channel 9 






EDBCH 12 


.1 


Channel 12 


i 




EDBCH9B 




Channel 9 with dual feed carriage 


§ 




EDBCH12B 




Channel 12 with dual feed carriage 






EDBCH1 




Channel 1 


CO 




EDBNCM 


1.. 


No carriage motion 


5 




EDBMESG 


1. 


Pending message 


3' 




EDBDI 


1 


EDB includes device independence 


"■ 



EDB FLAGBYTES LAYOUT (. . . .Cont'd) 



Displacement- 


Field name 






Field description 


Dec Hex 


uyi" 




EDBREQPK 


1 


Enable/disable 


»o 




EDBREQST 


.1 


Request stored 


ro 




EDBCNCL 




Cancel 


j? 




EDBMESG 
EDBLSTBK 


1. 

1 


Pending message 


CO 


Last EDB 






EDBDEVB 


.1 


Device busy 






EDBDEVI 




Device-end interrupt pending 






EDBREQ1 




First request 


O 




EDBCTLL 




Long control operation 


§ 




EDBCEIN 




Channel-end interrupt pending 


n 




EDBDELN 


1. 


Delay on 




15 F 


EDBDELY 
EDBFLAG2 


1 


Delay off 




M20 IOC/SC indicators for: 






EDBCHBIT 


1 


Chained IOC operation 






EDBPGCHK 


.1 


IOC program check 






EDBSCFT 


..1 


S/370 device has scan feature 






EDBRDAH 


..1 


Read ahead (IOC) 






EDBOPEN 


...1 .... 


DOS disk pack representing 
M20 disk pack is open 






EDBCTOPT 


.... 1... 


Non standard disk count field found 
in M20 core during a write count 
and data or verify count and data 
operation 






EDBUCBIT 


1.. 


Unit check on S/370 device during 
tape operation 






EDBSNSDN 


1. 


Sense done for file protect (IOC) 






EDBFILDPR 


1 


Tape in file protect (IOC) 






EDBWDATA 


1 


Previous Write data set 




36 24 


EDBDIST 

EDBDITP 
EDBDIDK 


1 

.1 


Device independence 

Generated for tape 
Generated for disk 






EDBDIACT 




.1 


Active on tape 






EDBDIAD 




.-1 .... 


Active on disk 






EDBIOPN 




... 1... 


File opened 






EDBFNRD 




... .1.. 


Read 






EDBFNPN 




1. 


Punch 






EDBFNPT 




1 


Print 




37 25 


EDBDIST2 

EDBDICHG 
EDBSIZ 


1 

.1 


Device independence indicators 

MFCM emulated by two 3525's 
Input record size is 80 





INTER - ROUTINE LINKS FOR COMMUNICATION ROUTINES 





— "/> dllcount 




IISTR 
emulated 
instr trace 


<— | 


load & call k 




— ► 










ir 
















IISHCcr 

communication 

control 


IISHFlor2 


« — 






k 


IISINeir 
emulator 
interrupt 

routine 


on a comm req ^ 






at completion 




DIL 


jjt comm compl 




IISHCeir 


IISHFfs 
function scan 


B transient 


interrupt 










to request an interrupt 


lISHCTk 
interrupt 

key routine 




































ik 










DOS supervisor 








External 


interrupt (Interrupt key or 
Attn MSG command) 





INTER - ROUTINE LINKS - Except communication routines 
XIO 



DIL 



ti A / /ik 



CIO 



TIOB 



I IS ID I/O decode 



IISCP or CPS 
CPU emulation 



yo«y 



IISD1 or D2orMF 

or PD2 or MD2 

or D3 or D4 or DE 

UR secondary I/O decode 



tape & disk XIO 



some CIO,TIOB 



DIL count interrupt 



IISCM or IISCMS 
UR common module 



ime s haring off 



post 360/20 op 



360/20 interrupt to be generated 



start I/O disk 



Q Trap points when using 
ihvi EDF command 



f test I/O no overla P 



IISTD tape and disk 
secondary I/O decode 



IISTDdl delay routine 



start I/O tape 



IISTP tape emulation 



timesharing on 



IISINeir 
emulator 
interrupt 
routine 



->| IISINtir 
360/20 
interrupt 
routine 



I 



overlap 



delay ON 



LL-overlap no delay 
-post 360/20 op 



delay OFF 



IISDK 
360/20 disk dependent 



IISDF CCW builder 



IISDD DOS interface 



post 360/20 op 



for message 



HFUNTAB ENTRIES 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for this routine 




Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Bytes 1-2 

Routine 

Identifier 

(in Hex) 


Byte 3 
Displacement 

Branch table • 
Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code= 


return code= -1 


return code= -2 


IISHFIN 




HF 


4 4 


194 (C2) 
OISHFMSG) 


205 (CD) 
(IISHCCR) 


208 (DO) 
(IISHCEIR) 





IISHFCMR 




HF 


12 C 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




6 6 


IISHFS 


S 


HF 


24 18 


200 (CB) 
(IISHFEX) 


208 (DO) 
(IISHCEIR) 


194 (C2) 
(IISHFMSG) 


11 0B 


SSBIISLE 


EOJ 


LE 


8 8 


194 (C2) 
(IISHFMSG) 


180 (B4) 
(IISDIBF) 




17 11 


$$BMSTS 


1 


TS 


8 8 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




22 16 


$$BIISCF 


CF 


CF 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




27 IB 


IISHFSK 


RCC keyword 
scanning 


HF 


16 10 


32 (20) 
(SSBIISTS) 






32 20 


$$BIISTS 


RCC 


TS 





205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




36 24 


$$BIISLE 


SR 


LE 


4 4 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




41 29 


IISHFCP 


CP 


HF 


28 1C 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




46 2E 



HFUNTAB ENTRIES (....Cont'd) 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for th 


is routine 




Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Bytes 1-2 

Routine 

Identifier 

(in Hex) 


Byte 3 
Displacement 

in 
Branch table • 

Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code= 


return code= -1 


return code= -2 


IISHFSK 


LD keyword 
scanning 


HF 


16 10 


55 (37) 
(SSBIISLE) 






51 33 


SSBIISLE 


LD 


LE 





208 (DO) 
(IISHCEIR) 


194 (C2) 
(IISHFMSG) 


180 (B4) 
(IISDIBF) 


55 37 


IISHFDIC 


HELP 


HF 


32 20 


61 (3D) 
(SSBIISPR) 


66 (42) 
(SSBIISDP) 




61 3D 


$$BIISPR 


HELP (exept for 
device indep.) 


PR 




194 (C2) 
(IISHFMSG) 






66 42 


SSBIISDP 


HELP (for dev. 
independence) 


DP 




194 (C2) 
(IISHFMSG) 






70 46 


IISHFSK 


CCT keyword 
scanning 


HF 


16 10 


78 (4E) 
(SSBIISCC) 






74 4A 


$$BIISCC 


CCT 


CC 




205 (CD) 
(IISHCCR) 


194 (a) 

(IISHFMSG) 




78 4E 


IISHFSK 


CS keyword 
scanning 


HF 


16 10 


87 (57) 
(SSBIISCS) 






83 53 


$$BIISCS 


CS 


CS 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




87 57 


IISHFSK 


DF keyword 
scanning 


HF 


16 10 


96 (60) 
(SSBIISDF) 






92 5C 



HFUNTAB ENTRIES (. . . .Cont'd) 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for this routine 


Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Bytes 1-2 

Routine 

Identifier 

(in Hex) 


Byte 3 
Displacement 

in 
Branch table • 

Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code= 


return code= -1 


return code= -2 


SSBIISDF 


DF 


DF 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




96 60 


IISHFSK 


TS keyword 
scanning 


HF 


16 10 


105 (69) 
($$BIISTS) 






101 65 


$$BIISTS 


TS 


TS 


4 4 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




105 69 


IISHFSK 


DK keyword 
scanning 


HF 


16 10 


1 14 (72) 
($$BIISTD) 






110 6E 


$$BIISTD 


DK 


TD 


4 4 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




114 72 


IISHFSK 


TP keyword 
scanning 


HF 


16 10 


123 (7B) 
($$BIISTD) 






119 77 


$$BIISTD 


TP 


TD 





205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




123 7B 


IISHFSK 


UR keyword 
scanning 


HF 


16 10 


132 (84) 
($$BIISUR) 






128 80 


$$BIISUR 


UR 


UR 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




132 84 


IISHFSK 


EC keyword 
scanning 


HF 


16 10 


141 (8D) 
($$BIISTD) 






137 89 



1401/1440/1460 DISK FORMAT 



PP bb 
2164 00 



LL bb 
108 00 



EMUL 
CTL 



SECTOR 1 
100 bytes 



LL bb 
108 00 



EMUL 
CTL 



SECTOR20 
100 bytes 



Format of a System/370 record representing a 1301 or 1311 track (sector mode) 



PP bb 

2992 00 


LL bb 
2988 00 


EMUL 
CTL 




TRACK 
2980 bytes 



Format of a System/370 record representing a 131 1 track (track mode) 



PP bb 

2555 00 


LL bb 
2551 00 


EMUL 
CTL 




TRACK 
2543 bytes 



Format of a System/370 record representing a 1301 track (track mode) 











)) 
















U 








PP bb 


LL bb 


EMUL 


SECTOR 1 




LL bb 


EMUL 


SECTOR 5 


1044 00 


208 00 


CTL 


200 bytes 


n 


208 00 


CTL 


200 bytes 










{( 









Format of a System/370 record representing a 1405 track 



PP bb : The first two bytes contain the length of the System/370 physical 

record; the last two are set to zero. 

LL bb : The first two bytes contain the length of a System/370 logical 

record; the last two are set to zero. 

EMULCTL : This 4-byte field is set to zero except for the first bit of the 
first byte: 

Bit = , move mode 
BitO = 1 , load mode 

SECTOR AND TRACK : This field contains the 1400 data. 



Disk format 


Load mode 


Move mode 


1301 or 1311 sector 


90 


100 


mode 






1301 track mode 


2261 


2543 


1311 track mode 


2682 


2980 


1405 


176 


200 



Number of 1400 Characters in System/370 Disk Records 



1401/1440/1460 

1400 ADDRESSES AND CORRESPONDING MACHINE CODES 



ADDRESSES 
0000-3999 



ADDRESSES 
4000-7999 A-bit 
(O-Zone)over Units 
Position 



ADDRESSES 
8000-11999 B-bit 
(1 1 -Zone) over 
Units Position 



ADDRESSES 
12000-15999 A B-bits 
(12-Zone) over 
Units Position 



Addresses Codes 



Addresses Codes 



Addresses Codes 



Addresses 



Codes 



0000-0099 
0100-0199 
0200-0299 
0300-0399 
0400-0499 
0500-0599 
0600-0699 
0700-0799 
0800-0899 
0900-0999 



000-099 
100-199 
200-299 
300-399 
400-499 
500-599 
600-699 
700-799 
800-899 
900-999 



4000-4099 
4100-4199 
4200-4299 
4300-4399 
4400-4499 
4500-4599 
4600-4699 
4700-4799 
4800-4899 
4900-4999 



00x-O9Z 
10x-19Z 
20x-29Z 
30x-39Z 
40x-49Z 
50x-59Z 
60x-69Z 
70x-79Z 
80x-89Z 
90x-99Z 



8000-8099 
8100-8199 
8200-8299 
8300-8399 
8400-8499 
8500-8599 
8600-8699 
8700-8799 
8800-8899 
8900-8999 



OOp-OOR 
10p-19R 
20p-29R 
30p-39R 
40p-49R 
50p-59R 
60p-69R 
70p-79R 
80p-89R 
90p-99R 



12000- 
12100- 
12200- 
12300- 
12400- 
12500- 
12600- 
12700- 
12800- 
12900- 



•12099 
•12199 
12299 
12399 
12499 
•12599 
12699 
12799 
12899 
12999 



00g-09l 
10g-19l 
20g-29l 
30g-39| 
40g-49| 
50g-59l 
60g-69I 
70g-79l 
80g-89l 
90g-99| 



1000-1099 
1100-1199 
1200-1299 
1300-1399 
1400-1499 
1500-1599 
1600-1699 
1700-1799 
1800-1899 
1900-1999 



x00-x99 
/00-/99 
S00-S99 
T00-T99 
U00-U99 
V00-V99 
W00-W99 
X00-X99 
Y00-Y99 
Z00-Z99 



5000- 
5100- 
5200- 
5300- 
5400- 
5500- 
5600- 
5700- 
5800- 
5900- 



■5099 xOx- 
5199 /Ox- 
■5299 S0x- 
■5399 T0x- 
■5499 U0x- 
■5599 V0x- 
■5699 W0x- 
■5799 XOx- 
■5899 Y0x- 
■5999 Z0x- 



-x9Z 
-/9Z 
-S9Z 
-T9Z 
-U9Z 
-V9Z 
-W9Z 
■X9Z 
-Y9Z 
-Z9R 



9000-9099 
9100-9199 
9200-9299 
9300-9399 
9400-9499 
9500-9599 
9600-9699 
9700-9799 
9800-9899 
9900-9999 



x0p-x9R 

/0 P -/9R 

S0p-S9R 

T0p-T9R 

U0p-U9R 

V0p-V9R 

W0p- 

XOp- 

Y0p-Y9R 

Z0p-Z9R 



13000- 
13100- 
13200- 
13300- 
13400- 
13500- 



13800- 
13900- 



13099 
13199 
13299 
13399 
13499 
13599 
13699 
13799 
13899 
13999 



x0g-x9l 
/0g-/9l 
S0g-S9l 
T0g-T9l 
U0g-U9l 
V0g-V9l 
W0g-W9| 
X0g-X9l 
Y0g-Y9l 
Z0g-Z9l 



2000-2099 P 00- 
2100-2199 J00- 
2200-2299 K00- 
2300-2399 LOO- 
2400-2499 M00- 
2500-2599 N00- 
2600-2699 O00- 
2700-2799 POO- 
2800-2899 Q00- 
2900-2999 R00- 



6000-6099 
6100-6199 
6200-6299 
6300-6399 
6400-6499 
6500-6599 
6600-6699 
6700-6799 
6800-6899 
6900-6999 



10000- 
10100- 
10200- 
10300- 



P 0x-p9Z 

J0x-J9Z 

K0x-K9Z 

L0x-L9Z 
M0x-M9Z 
N0x-N92 
O0x-O92 

P0x-P9Z 
Q0x-Q9Zll0800-; 



P0x-P9Z 



10700- 
10800' 
10900- 



10099 P 0p- 
10199 JOp- 
10299 KOp- 
10399 LOp- 
10499 MOp- 
10599 NOp- 
10699 OOp- 
10799 POp- 
10899 QOp- 
10999 ROp- 



14000' 
14100- 
14200' 
14300' 



•M9R 14400' 
• N9R 14500- 



14900- 



•14099 P 0g-p9l 
■14199 J0g-J9l 
■14299 K0g-K9l 
■14399 L0g-L9| 
•14499 M0g-M9l 
■14599 N0g-N9l 
■14699 O0g-O9l 
■14799 P0g-P9l 
■14899 Q0g-Q9l 
■14999 R0g-R9l 



3000-3099 
3100-3199 
3200-3299 
3300-3399 
3400-3499 
3500-3599 
3600-3699 
3700-3799 
3800-3899 
3900-3999 



g00-g99 
A00-A99 
B00-B99 
C00-C99 
D00-O99 
E00-E99 
F00-F99 
G00-G99 
H00-H99 
100-199 



7000-7099 
7100-7199 
7200-7299 
7300-7399 
7400-7499 
7500-7599 
7600-7699 
7700-7799 
7800-7899 
7900-7999 



g0x-g9Z 
A0x-A9Z 
B0x-B9Z 
C0x-C9Z 
D0x-D9Z 
E0x-E9Z 
F0x-F9Z 
G0x-G9Z 
H0x-H9Z 
IOx-l9Z 



11000- 
11100- 
11200- 
11300- 
11400- 
11500- 
11600- 
11700- 
11800- 
11900- 



11099 gOp- 
11199 AOp 
11299 B0 P ' 
11399 C0 P ' 
11499 D0 P ' 
11599 EOp- 
11699 FOp' 
11799 GOp- 
11899 HOp' 
11999 IQp- 



15000- 
15100- 
15200- 
15300- 
15400- 
15500- 
15600- 
15700- 
15800- 



-15099 g 0g-g9l 
-15199 A0g-A9l 
-15299 B0g-B9| 
-15399 C0g-C9| 
-15499 D0g-D9l 
-15599 E0g-E9l 
-15699 F0g-F9l 
-15799 G0g-G9l 
-15899 H0g-H9l 
■15999 I0g-I9l 



Note : The symbols # 
since this is thi 



, ! and ? have been replaced by the letters x, p and g, respectively 
le method of display on the 1052 Printer- Keyboard. 



1401/1440/1460 PROBLEM DETERMINATION AIDS 



D ynamic Service Aids, format of emulator commands : 



IDENTIFI- 
CATION 


KEYWORD AND 
OPERANDS 


FUNCTION 


DISPLAY 


CONFIG 
ADDR=nnnnn 

XADDR=nnnnnn 

SENSE 

INQUIRY 

REG 

STATUS 

TAPE [ =n ] 

DISK [=n] 

UR 


Assignment of all I/O devices . 

40 Characters of 1400 core storage from 1400 decimal 
address nnnnn . WM are displayed as one underscore 
Word separator as 2 ( — ) . 

4 Fullwords of S/370 main storage data from hex 
address nnnnnn . 

Emulated sense switches from A to G . 

Inquiry indicator . 

IAR, AAR, BAR . 

Switches and IAR, BAR, AAR. 

Assignment of tape unit n . Default value is display all . 

Assignment of disk storage n. Default is display all. 

Assignment of all UR devices 


DEBUG 


ACTION=fsET 1 

<resetV 

(nnnnnj 

type= Tad stop] 
step 

(TRACE J 


Emulates certain debugging functions. Only one is 
active at a given time. Next command cancels the 
effect of the previous one. DEBUG=YES must be 
coded in the EMSUP macro. 

SET= enables TYPE=SET or TYPE=TRACE 
RESET= disable TYPE action 
nnnnn= 1400 stop address 

ADSTOP= 1400 stop address emulation 
STEP= l/E Mode switch emulation 
TRACE= lists on SYSLST all 1400 instructions 
executed and AAR, IAR, BAR. 


DUMP 


FROM=a,TO=b 
XFROM=a,XTO=b 


Dumps onto SYSLST the 1400 core storage or the 
S/370 main storage. Default value is all 1400 core 
storage dumped. DEBUG=YES must be coded in the 
EMSUP macro. 

1400 Core storage, a and b are decimal from 1 to 5 
digits long. Default value is all core dumped. 

S/370 Main storage . a and b are hex from 1 to 6 
digits long. Default value is all storage dumped. 


RETRY 




Used to reread a card that has just been corrected. 
May be used only if 1400 card are read on a 2540 or 
a 3505. 



1401/1440/1460 PROBLEM DETERMINATION AIDS (. . . .Cont'd) 

Emulator Routine in Error 

If an emulator message has been issued, the message explanation should give some 
idea as to the nature of the error. The Logic Manual lists all the routines that can 
issue a particular message. 

• Determine which 1400 instruction was being emulated at error time. 
9 lAR normally points to the next 1400 instruction to be emulated . 

e Use lAR, program listing or dump to locate the 1400 instruction to be emulated. 

o The last 1400 I/O instruction emulated (M, L or U op-code) is stored at CCINSTSV. 

Communication Region 

GPR 3 should point to it which is on a 256 byte boundary (first 512 bytes are put on 
the same page) . 

• If GPR 3 does not point to the COMREG, locate IIQCR01 in the linkedit map. 
The COMREG is located at the next 256 byte boundary address. 

Emulated 1400 Core Storage 

9 Beginning address : CRMAPORG 

e Ending address : CRMAPEND 

9 1400 core storage is bounded at each end by a double word containing X'FF' . 

Control Blocks and buffers 

9 Buffers and DTF's can be located using pointers in the SUB or DUB of the 
emulated device. 

© To find a SUB or DUB, find a displacement in the device assignment table at 
CCASNDEV in the COMREG (displacement 8D0) and the address of the UCB 
address list at CMUCBLST (displacement 888). Using the value from CCASNDEV 
multiplied by 4, as an index, get the address of the corresponding SUB or DUB, 

or : When control has been given to I/O emulation and DOS interface routines, 
get the address of the SUB or DUB involved from GPR 9 , 

or : As the file name is in BCD in the SUB and DUB, find it in the dump between 
the COMREG and emulated 1400 core storage. 

1400 Registers 

The lAR, BAR, AAR are maintained in S/370 binary format, use emulator commands 
DISPLAY=REG or DISPLAY=STATUS to display the contents of those registers. 



Note : COMREG stands for Communication Region . 



1401/1440/1460 TABLE OF REGISTER USAGE 



ROUTINE 


REGISTER 


CONTENTS AT ENTRY EMULATOR ROUTINES 


IIQEP 


Same as 


IIQAP 


IIQID 


3 - 


Address of communication region 




4 - 


BAR 




5 - 


AAR 




6 - 


IAR 




7 - 


Base register for this routine 




13 - 


Save area address provided by this routine 


IIQIU 


Same as 


IIQDS 


IIQMC 


Same as 


IIQAP 


1IQMD 


Same as 


IIQAP 


IIQMV/ 


- 


Address of variable text or zero 




1 - 


Message number of message to be issued 




13 - 


Address of caller's register save area 




14 - 


Return address 




15 - 


Entry point address 


IIQNT 


Same as 


IIQDS 


IIQOA 


- 


Address of variable text or zero, or length of operator's 
reply on return from IIQMV/ 




1 - 


Message number of message to bo issued or address of 
operator's reply on return from IIQMW 


IIQOB 


- 


Length of the emulator command or control statement 




1 - 


Address of the emulator command or control statement 


IIQOC 


- 


Address of a parameter list 


thru 






IIQOK 






IIQTP 


3 - 


Address of communication region 




9 - 


Address of SUB 




13 - 


Address of caller's register save area 




14 - 


Return address 




15 - 


Entry point address and DILCNT interruption indication 


IIQSD 


3 - 


Address of communication region 




13 - 


Address of caller's register save area 




14 - 


Return address 




15 - 


Entry point address 


IIQST 


3 - 


Address of communication region 




7 - 


Base register for this routine 


IIQUR 


3 - 


Address of communication region 




4 - 


BAR 




13 - 


Address of caller's register save area 




14 - 


Return address 




15 - 


Entry point address and DILCNT interruption indication 


IIQUR1 


3 - 


Address of communication region 




4 - 


BAR 




9 - 


Address of printer SUB 




13 - 


Address of caller's register save area 




14 - 


Return address 




15 - 


Entry point address 



1401/1440/1460 TABLE OF REGISTER USAGE (...:Confd) 



ROUTINE 


REGISTER CONTENTS AT ENTRY EMULATOR ROUTINES 


IIQVT 


Same as IIQDS 


IIQAP 


3 - Address of communication region 




4 - BAR 




5 - AAR 




7 - Base register for this routine 


IIQCN 


3 - Address of communication region 




4 - BAR 




9 - Address of SUB 




14 - Return address 




15 - Entry point address 


IIQCP 


3 - Address of communication region 




4 - BAR 




5 - AAR 




7 - Base register for this routine 


IIQDI 


3 - Address of communication region 




4 - BAR 




5 - AAR 




9 - Address of DUB 




14 - Return address 




15 - Entry point address 


IIQDK 


Same as IIQDI 


IIQDS 


- Code indentifying function to be performed 




1 and 9 - Address of SUB 




3 - Address of communication region 


IIQEI 


- Code indentifying function to be performed 




1 - Address of SUB or DUB 



Note that the DILCNT, set by unit record and tape emulation routines 
for overlapped I/O operations, is in the seven leftmost bits of GPR 6. 

The compatibility feature DIL instruction sets GPR 4, GPR 5, GPR 6, 
and GPR 7 (BAR, AAR, IAR, and base register) before giving control 
to an emulator program routine. The compatibility feature also uses 
GPR 2 as a work register. 



Register usage remains the same throughout the execution of a given 
routine. In addition, note that GPR 15 is used for return codes by 
IIQEI, IIQDS, IIQIU, IIQMW, IIQNT, IIQVT, and IIQOC through 
IIQOI. 



1410/7010 PROGRAM ORGANIZATION 



Emulator program overlay tree: 

IIR1NENT 

IIRURS 

IIRCRC2 

IIRCRC1 

IIR14DEB 

IIRINECB 

IIROJED 

IIRMWTR 

IIRSDR01 

IIROACON 

IIROBCON 

IIRINHF 



IIRINEIO 
IIRCCPRO 
IIRCCMOD 



The CSECTs on the left of the 
figure, below the horizontal 
line, are overlayed when the 
execution phase is loaded into 
System/370 main storage . 



Emulator Program CSECT Layout 



IIRSTR 

IIRCP 

IIRFP 

IIRST 

1 1 RPR 

IIRISDCS 

IIREIOCS 

IIREJR 

IIRBFEIO 

IIRTPMLU 

IIRMTMOD 

IIRNTDOS 

IIRVTDOS 

IIRDSMOD 

IIRDSDOS 

IIRDCC 

I1RDK0 

MRU «OOS 

IIRMIM 

IIRMIC 

IIRIS 

IIRURMOD 

IIRDK1 

IIRINBUF 



INITIALIZATION 


CPU EMULATION 


I/O EMULATION 


EMULATOR SERVICES 


IIRINENT 


IIRCP 


IIRURS 


IIROJED 


IIRINECB 


IIRFP 


IIRIDCS 


IIRMWTR 


IIRINHF 


IIRST 


IIREIOCS 


IIRSDR 


IIRINEIO 


IIRPA 


IIRBFEIO 


IIROACON 


IIRINBUF 


IIRMIM 


IIRTPMLU 


IIROBCON 




IIRMIC 


IIRMTMOD 


IIRCCPRO 






IIRNTDOS 


IIRCCMOD 






IIRVTDOS 


IIRSTR 






IIRDSMOD 


IIR14DEB 






IIRDSDOS 


IIREJR 






IIRDCC 








IIRDKO 








IIRIUDOS 








IIRIS 








IIRURMOD 








IIRDK1 





1410/7010 DISK FORMAT 



4 bytes 


4 bytes 


4 bytes 


4 bytes 


4 bytes 


8 bytes 


n bytes / 


1 

PP | bb 

1 


1 

"1" 

1 


1 
XTRK 

NMBR ** 

1 


1 
SGMl 

LGTh 

1 


1 

** 'm* 

1 


1 I 1 
TRACK REC 

** 'NUMBER 'NM 
1 1 IBR 


DATA 














{ 



2 by- 

tes | 4 bytes | 8 bytes 



1 I 

" TRACK | REC 



1 NUMBER NM 
I I I BR 



n bytes 



Each System/370 disk record represents one 1400 disk track. 



PP 


: Length of the S/370 physical record 

1301 Mod 1 and 2 : 2,828 bytes 

1302 Or 2302 Mod 1 and 2 : 5,878 bytes 


bb 


: Set to zero 


XTRK 
NMBR 


Hex number of the 1400 track (first trk is 0) 
: First byte : bit = move mode 
= 1 load mode 


SGMT 
LGTH 


Sum of the length of the control information field 
: (14 bytes) and the 1400 data field 


LM 


: Bit = move mode 
= 1 load mode 


TRACK 
NMBR 


: Decimal number of the 1400 track 


REC 
NMBR 


: Decimal number of the record (first record is 0) 


** 


: Not used 



DISK FORMAT 


LOAD MODE 
CHARACTERS 


MOVE MODE 
CHARACTERS 


1301 

Models 1 and 2 

1302 or 2302 
Models 1 and 2 


2165 
4533 


2800 
5850 



Number of 1400 characters in System/370 Disk Records 



1410/7010 TABLE OF REGISTER USAGE 



MODULE 


REGISTER CONTENTS AT ENTRY 


IIRCP 


3 - Address of the communication region 




4 - BAR 




5 - AAR 




7 - Base register 


IIRDK 


3 - Address of the communication region 




4 - BAR 




5 - AAR 




9 - Address of the DUB 




10 - Address of the ECCB 




14 - Return address 




15 - Entry point address 


IIRDL 


Same as IIRDK 


IIRDS 


- Code indentifying the function to be performed 




1 and 9 - Address of the DUB or the SUB 




3 - Address of the communication region 


IIREI 


- Code indentifying the function to be performed 




1 - Address of a DUB or SUB 


IIRID 


3 - Address of the communication region 




4 - BAR 




5 - AAR 




6 - IAR 




7 - Base register 




13 - Save area address 


IIRIU 


Same as IIRDS 


IIRMI 


Same as IIRCP 


IIRFDP 


Same as IIRCP 


IIRPR 


Same as IIRCP 


IIRST 


Same as IIRCP 


IIRMW 


- Address of variable text or zero 




1 - Message number of message to be issued 




13 - Address of caller's register save area 




14 - Return address 




15 - Entry point address 


IIRNT 


Same as IIRDS 


IIROA 


- Address of variable text or zero, or length of 68160r 




operator's reply on return from IIRMIO 




1 - Message number of message to be issued or address of 




an operator's reply on return from IIRMIO 


IIROB 


- Length of the emulator command or control statement 




1 - Address of the emulator command or control statement 


II ROC 


- Address of a parameter list 


thru 




IIROK 





1410/7010 TABLE OF REGISTER USAGE (.. ..Cont'd) 



MODULE 


REGISTER CONTENTS AT ENTRY 


IIRTP 


3 - 


Address of the communication region 






9 - 


Address of the SUB 






10 - 


Address of the ECCB 






13 - 


Address of caller's register save area 






14 - 


Return address 






15 - 


Entry point address and DILCNT interruption 


indication 


IIRSD 


3 - 


Address of the communication region 






13 - 


Address of caller's register save area 






14 - 


Return address 






15 - 


Entry point address 




IIRST 


3 - 


Address of the communication region 






7 - 


Base register 




IIRVT 


Same as 


IIRDS 





Note that GPR 15 is used for return codes by IIREI, IIRDS, IIRIU, 
IIRMW, IIRNT, IIRVT, and IIROC through IIROI and IIROK. 

The compatibility feature DIL instruction sets up GPR 4, GPR 5, 
GPR 6, and GPR 7 (the BAR, AAR, IAR, and entry point address 
for the routine given control), before giving control to an emulator 
program routine. The compatibility feature also uses GPR 2 as a 
work register. 



1410/7010 PROBLEM DETERMINATION AIDS 
D ynamic Service Aids, format of emulator commands : 



IDENTI- 
FICATION 


KEYWORD AND 
OPERANDS 


COMMENTS 


DISPLAY 


SWITCH 
REG 
STATUS 
TAPE t=cn] 

DISK[=cma] 

UR 

CONFIG 

ADDR=nnnnn 

XADDR=nnnnnn 


Displays on SYSLOG 

Status of the inquiry indicator 

IAR, AAR, BAR 

Switches and IAR, AAR, BAR 

Assignment of tape unit en (c=channel, n=unit) 
Default value is display all 

Assignment of disk storage cma (c=channel,m~module, 

a=unit) 

Default value is display all 

Assignment of all unit record devices 

Assignment of all I/O devices 

40 Characters of 1400 core storage from 1400 decimal 
address 'nnnnn'. WM are displayed as one underscore 
Word separator as 2 ( — ) 

4 Fullwords of S/370 main storage data from 
hex address 'nnnnnn' 


DEBUG 


ACTION= [nnnnn] 
SET i 

[reset) 

TYPE= fADSTOP"] 

r EP ( 

[TRACE J 


Emulates certain debugging functions. Only one is 
active at a given time. Next command cancels the 
effect of the previous one. 
DEBUG=YES must be coded in the EMSUP macro. 

'nnnnn' = 1400 stop address 

SET = enable TYPE=SET or TYPE=TRACE 

RESET = disable TYPE action 

ADSTOP = 1400 stop address emulation 

STEP = l/E Mode switch emulation 

TRACE = lists on SYSLST all 1400 instructions executed 

and AAR, IAR, BAR 


DUMP 


FROM=fc,TO=b 
XFROM=o,XTO=b 


Dumps onto SYSLST the 1400 core storage or the S/370 
main storage. Default value is all 1400 core storage 
dumped. DEBUG=YES must be coded in the EMSUP macro 

1400 core storage (a and b are decimal from 1 to 5 
digits long. Default value is all core dumped. 

S/370 main storage (a and b are hex from 1 to 6 
digits long. Default is all storage dumped. 



CHAPTER VI 
BTAM 




CONTROL BLOCK LINKAGES 



I/O Area 



Special Char. 



. BTAM Module 



I/O Executor 
(EXCP) 



I/O Interrupt 
Handler 



I/O Error 
Routine 



Partition COMREG 



CSW 
Status Byte 



Logical 
Unit order 








1 


* 


3 


Of 0) 


LCB Count 


LCB Size 


Feature Flags 


4( 4) 


Flag Byte 1 
or 1AM 


WRU 


EOM 


EOT 


8(8) 


DTFBT Flags 


Buffer Control Block Address 


12(0C) 


Device Code 


Address of CCW Model Table 


16(10) 


DTFBT Length 
16 


Address of BTAM Logic 


20(14) 


DTF Type + 
Code 


Flag Byte 2 


Message Length or 


Mondly 


24(18) 


Retry Count 


Address of Table of specific characters 


28(1 C) 


2x Retry Count 


Line Error Block Address 


32(20) 


Address of Table of Offsets 


36(24) 


Reserved 


40(28) 


^CCB-LCB Area (S 


ee Line Control Blocks) 






Buffer Pool (if an) 


o 





DTFBT Table Explanation 



Byte(s) 


Description 


Meaning 


Source 


0(0) 
LCB Count 


The number of LCB's in this DTFBT 


Generated by the DTFBT 
macro by analyzing the 
LINELST keyword operand 


I(D 
LCB Size 


The number of bytes in each LCB in 
this DTFBT 


Computed by DTFBT macro 
expansion from the DE- 
VICE and FEATURE ope- 
rands 


2=1 (2-3) 
Feature Flags 


Describes device features : 

First byte (2) 

Bit Configuration Meaning 

B' 10000000' SIX 
B'01000000' SXW 
B'11000000' SIW 
B'00100000' RIX 
B'00010000' RXW 
B'OOl 10000' RIW 
B'00001000' SLV 
B'00000100' BSC 
B'00000010' Reserved 

B'ooooooor oiu 


DTFBT macro operand 
FEATURE 



DTFBT TABLE (....Cont'd) 



DTFBT Table Explanation 



Byte(s) 


Description 


Meaning 


Source 


2-3 (2-3) 


Second byte (3) 




Feature Flags 
(Cont'd) 


Bit Configuration Meaning 

B'10000000' Station Control 

(STC) 
B'01000000 1 Transmit Control 

(TRC) 
B'00100000' Checking (CHK) 
B'00010000' PCI 
B'00001000' Start-stop Auto 

Poll 

Bits 5-7 of the second byte are 
reserved 




4 (4) 


Describes WTTA device feature 


DTFBT macro operand 


1AM or 




FEATURE 


Flag Byte 1 


Local 2260/local 3270 Flags: 


2260 local READ routine 




Bit Configuration Meaning 


and Interruption handler/ 




B'10000000' On-line Termi- 


BSC Message Analysis 
Routine 




nal Test Flag 




B'00010000' Local 2260 and 






local 3270 






RESTPL Inhibit 






Flag 






B'00001000' Local 2260 and 






local 3270 NOP 






Wait Flag 






B'00001000' BSC Valid First 






Character Flag 






(used by IJLM- 






ARTN) 






B'00000100' Local 2260 and 






local 3270 Read 






Wait Flag 






B '000000 10' Local 2260 and 






local 3270 Res- 






can Flag 






B'OOOOOOOl' Load 2260 and 






local 3270 En- 






able-Read-in- 






AppendageFlag 






The remaining bits are reserved. 






When bit zero is on , the next three 






bytes contain On-line Terminal Test 






Information. For the local 2260 and 






local 3270, the next three bytes 






contain a pointer to the DECB 




1(5) 


Describes WTTA device feature 


DTFBT macro operand 


WRU 




FEATURE 


6 (6) 


Character representing the end of a 


DTFBT macro operand 


EOM 


message (WTTA) 


EOM 



DTFBT TABLE (....Cont'd) 



DTFBT Table Explanation 



Byte(s) 


Description 


Meaning 


Source 


Z(7) 
EOT 


Character representing the end of a 
transmission (WTTA) 


DTFBT macro operand 
EOT 


8 (8) 
DTFBT Flags 


Bit Configuration Meaning 

B'OOOOOOOT DTFBT Open 
Flag 

B'00000010' Non-partitioned 
channel program 
flag 

B'00000100' Switched net- 
work flag 

B'00001000' Multipoint con- 
figuration (BSC) 

The remaining bits are reserved 


The switched-network 
flag, the multipoint flag 
and the non-partitioned 
channel program flag are 
put in at assembly time. 
The open flag is maintained 
by the OPEN and CLOSE 
routines. 


9-11 (09-OB) 
Buffer Control 
Block Address 




Put in at assembly time 
by the DTFBT macro 


12 (OC) 
Device Code 


Numeric identifier of the type of 

device attached to the lines of this 

group 

Devices Equated to 

1030 1 
1060 2 
2848 3 
83B3 4 
115A 5 
2260 6 
1050 7 
2740 8 
TWX33 9 
TWX35 10 
1130 12 
2780 13 
WTTA 14 
2020 15 
3277 17 


Put in by the DTFBT macro 
using the DEVICE keyword 
operand 


13-15 (OD-OF) 
CCW Model 
Table Address 




Put in by the Linkage 
Editor 


16(10) 
DTFBT Length 
16 




Put in at assembly time 


17-19 (11-13) 
Address of 
BTAM Logic 




Put in by the Linkage 
Editor 


20 (14) 
DTF-tCU 


Numeric identifier of the DTF type 
and the control unit type 


Initialized at assembly 
time from the CU keyword 
operand 



DTFBT TABLE (....Cont'd) 



DTFBT Table Explanation 



Byfe(s) 


Description 


Meaning 


Source 


20 (14) 
DTF-tCU 
(Cont'd) 


The DTF code is X'40' for a DTFBT. 
The following CU codes are OR'ed 
into the low-order 4 bits: 
Control Unit Equated to 




7770 1 
2848 3 

2701 4 

2702 5 

2703 6 
3272 7 


21 (15) 
Flag Byte 2 


Flags for ERP: 

Bit Configuration Meaning 


Flags are set by the 
ERROPT operand 


B'00000100' ERP requested 
B'00000010' Read text retry 
B '0000000 1' Write text retry 

The remaining bits are reserved 


22-23 (16-17) 
Message Length 




DTFBT macro operand 
MSGL 


MONDLY 


Number of pad characters (WTTA) 


DTFBT macro operand 
MONDLY 


24 (18) 
Retry Count 


BSC Retry Ceiling 


DTFBT macro operand 
RETRY 


25-27 (19-1B) 
Address of 
Table of specia 
Characters 




Put in by Linkage Editor 


28 (1C) 

2x Retry Count 


2x BSC Retry Ceiling 


DTFBT macro operand 
RETRY 


29-31 (1D-1F) 
Line Error 
Block Address 




DTFBT macro operand 
LERBADR 


32-35 (20-23) 
Table of 
Offsets 


Pointers to the table of model 
CCW's corresponding to operation 
types defined for a particular device 
The displacement in the Table of 
Offsets corresponds to the operation 
code for the macro. An X'FF' at 
displacement 07 in the table, for 
example, means that optype X'07' 
(READ Repeat-TP) is not available. 

Operation Type Codes 

Code Macro 

X'OO' WRITE DISCONNECT 
X'01' READ INITIAL 
X'02' WRITE INITIAL 


Generated by the DTFBT 
macro from the DEVICE 
operand 



DTFBT TABLE (....Cont'd) 
DTFBT Table Explanation 



Byte(s) 



Description 



Meaning 



32-35(20-23) 
Table of 
Offsets 
(Cont'd) 



X'03' 


READ CONTINUE 


X'04' 


WRITE CONTINUE 


X'05' 


READ CONVERSATIO- 




NAL 


X'05' 


READ CONTINUE WITH 




GRAPHICS 


X'06' 


WRITE CONVERSATIO- 




NAL 


X'07' 


READ REPEAT 


X'08' 


Write ack 


X'08' 


WRITE INIT TRANSPA- 




RENT BLOCK 


X'09' 


READ INITIAL INQUIRY 


X'09' 


READ SKIP 


X'OA' 


WRITE NAK 


X'OA' 


WRITE INITIAL TRANS- 




PARENT TEXT 


X'OB' 


READ BUFFER 


X'OB' 


READ REPEAT WITH 




GRAPHICS 


X'OC 


WRITE AT LINE ADDR. 


X'OC 


WRITE INIT TRANSPA- 




RENT CONVERSATIO- 




NAL 


X'OD' 


READ SHORT 


X'OD' 


READ INQUIRY 


X'OE' 


WRITE ERASE 


X'OE' 


WRITE INITIAL CON- 




VERSATIONAL 


X'OF' 


READ CONTINUE WITH 




IDENTIFICATION EX- 




CHANGE (WT TELE- 




GRAPH) 


X'10' 


WRITE INVITATIONAL 


X'10' 


WRITE TRANSPARENT 




BLOCK 


x'ir 


READ INTERRUPT 


XM1' 


READ MODIFIED 


X'12' 


WRITE TRANSPARENT 




TEXT 


X'12' 


WRITE INITIAL OPTI- 




CAL 


X'12' 


WRITE UNPROTECTED 




ERASE 


X'13' 


READ CONTINUE WITH 




LEADING ACKNOW- 




LEDGEMENT 


X'13' 


READ CONNECT 


X'13' 


READ BUFFER FROM 




POSITION 



DTFBT TABLE (....Cont'd) 



DTFBT Table Explanafic 



Byte(s) 


Description 


Meaning 


Source 


32-35 (20-23) 
Table of 
Offsets 
(Cont'd) 


Code Macro 

X'14' WRITE TRANSPARENT 
CONVERSATIONAL 

X'14' WRITE INVITATIONAL 
OPTICAL 

X'15' READ CONNECT WITH 
TONE 

X'16' WRITE EOT 

X'16' WRITE CONVERSATIO- 
NAL OPTICAL 

X'18' WRITE WACK 

X'19' READ MOD IF IED FROM 
POSITION 

X'lA' WRITE INQUIRY 

X'lB' CONTROL INITIAL 

X'lC CONTROL DISABLE 

X'lD' CONTROL MODE 

X'lE' CALL SEGMENT 

X'lF' ANSWER 

X'20' WRITE CONNEa 




36-39 (24-27) 
Reserved 






40-XX(28-..) 
Line Control 
Blocks 


Line control blocks describe the 

particular line 

(See Line Control Block for detailed 

description) 


One LCB is generated 
at assembly time for each 
line in the LINELST ope- 
rand sublist 


XX-XX (..-.. 
Buffer Pool 


(Optional) 





LINE CONTROL BLOCK 



0( 0) 



16(10) 
20(14) 



24(18) 
32(20) 
40(28) 

104(68) 

108(6C) 
112(70) 



| . , | 2 


3 


CCB 


Flag Byte 


DECB Address 


Relative Line No 


Send ! Rcve 
Ack _[ Ack 


Reserved 


Mode B'yte(BSC) 


Local 3270 
Flag Byte 


ERP Message Code and Status Save Area 


CCW Area reserved for ERP and Audio 


User Channel Program Area 


Marker (BSC) 


Total User CCW 
Retries (BSC) 


User CCW 
Retries (BSC) 


ERP CCW Retries 
(BSC) 


BSC Flag Byte 1 


BSC Flag Byte 2 


BSC Flag Byte 3 


Reserved 


BSC ERP CCW Area (3 double-words) 



Line Control Block Explanation 



Byte(s) 


Description 


Meaning 


Source 


0-15 (00-0F) 
CCB 


Command Control Block 


Space is reserved by the 
DTFBT instruction. The 
contents of the block are 
maintained by the Super- 
visor, ULCPGXand 
IJLBTIH. 


16(10) 

LCB Flag Byte 


Used to indicate LCB Conditions 
Bit Configuration Meaning 


These flags are initialized 
by the DTFBT macro in- 
struction. IJLCPGX, 
IJLBTIH and OPEN main- 
tain them. 


B' 10000000' Last LCB in line 
group 

B'0 1000000' Line error at 
Open (except 
for local 2260 
and local 3270 

B'01000000' Local 2260 or 

local 3270 Read 
started from 
Appendage 



LINE CONTROL BLOCK (. . . .Cont'd) 



Line Control Block Explanation 



Byte(s) 


Description 


Meaning 


Source 


16 (10) 


Bit Configuration 


Meaning 




LCB Flag Byte 
(Cont'd) 


B'00100000' 


Halt I/O reques- 
ted 






B'000 10000' 


LCB Cancel flag 
(ERP) 






B'00001000' 


Write at Line 
Address (remote 
2260), LCB Q- 
flag (local 2260 
or local 3270) 






B'00000100' 


Attention flag 
(local 2260 or 
local 3270), 
Terminal Test 
flag (OIU) 






B'00000010' 


Skip flag (local 
2260 or local 
3270), Frame 
Change Test flag 
(OIU) 






B'ooooooor 


Printer flag (lo- 
cal 2260 or lo- 
cal 3270), Mes- 
sage from OIU 
flag (OIU) 






b 'ooooooo r 


Re-read flag 
(WTTA) 






B'ooooooor 


Auto Poll chan- 
nel program mo- 
dified flag (BSC) 




17-19(11-13) 






This field is set to zero 


DECB Address 






by the completion logic; 
The address is supplied 
by IJLCPGX 


20 (14) 


Relative Line Number 


The relative line number 


RLN 






is inserted by the DTFBT 
macro instruction 


21(15) 








Send ACK/ 








Rcve ACK or 








Local 3270 


Bit Configuration 


Meaning 




Flag Byte 


B' 10000000' 


Printer busy flag 






B '01 000000' 


Unreliable devi- 
ce buffer content 






B'00100000' 


RFT in progress 
flag 






B '000 10000' 


Start original 
READ flag (RFT 
flag) 






B'00001000' 


I/O request flag 





LINE CONTROL BLOCK (. . . .Cont'd) 



Line Control Block Explanation 



Byte(s) 


Description 


Meaning 


Source 


22(16) 
Reserved 






23(17) 
Mode Byte 


Used for Set Mode 


Initialized at assembly 
time; Updated via CON- 
TROL 


24-31 (18-1F) 
ERP Code and 


Error Message Code (byte 24) 


The hex value (1-byte) 
of the error message num- 
ber to be printed is inser- 
ted by the routine that 
determined the error con- 
dition 


Status Save 
Area 


CSW bytes 1-7 (but not byte 0) 
(bytes 25-31) 


The CSW is saved for the 
last user (non-ERP) CCW 
that completed 


32-39 (20-27) 
ERPCCW 




CCW is set up and execu- 
ted in an attempt to re- 
cover from the error con- 
dition 


40-103 (28-67) 
CCW Space 


Channel Program Area 


IJLCPGX builds the 
channel program in this 
space 


104-107 (68-6E 
Marker and 
Retry Bytes 


) 




108 (6C) 

BSC 

Flag Byte 1 


Bit 0: 1= ENQ can be legally re- 
ceived 
0= ENQ an illegal response 
to text 

Bit 1: 1 = Last response-to-text was 
NAK (i.e., NAK was sent 
to remote station as the 
response to the last recei- 
ved message) 

Bit 2: 1= No response was received 
to previous Write text 

Bit 3: 1= No retry flag 

Bit 4: 1= Error occurred on an ERP 
CCW 

Bit 5: 1= ERP in process (due to 
Unit Check) 

Bit 6: 1= Error occurred on a Read 
Response to text or a Read 
text in a conversational 
WRITE channel program 

Bit 7: 1 = First retry of the error dis- 
cussed for bit 6 





LINE CONTROL BLOCK (. . . .Cont'd) 



Line Control Block Explanation 



Byte(s) 


Description 


Meaning 


Source 


109 (6D) 

BSC 

Flag Byte 2 


For any READ/WRITE macro other 
than WRITE Inquiry (TQ) with entry 
coded 'S 1 , the Operation flag byte 1 
in the DECB is moved into the BSC 
flag byte 2 in the LCB 

For WRITE Inquiry (TQ) with entry 
not coded *S' bit-2 (B '00100000') 
of the BSC flag byte 2 in the LCB is 
turned ON subsequent to the moving 
in of the DECB Operation flag byte 1 

Note: 

For WRITE Inquiry (TQ) with entry 
coded 'S', the BSC flag byte 2 in 
the LCB Extension will contain the 
value set by IJLCPGX for the most 
recently issued macro (normally an 
initial-type WRITE for dial opera- 
tion) that was not a WRITE TQ with 
entry ceded 'S' 


Initialized by IJLCPGX 


110 (6E) 

BSC 

Flag Byte 3 


Bit 0: BTAM initiates terminal test 
Bit 1: LCB in test flag 
Bit 2: X= flag for on-line test 
Bit 3: Invalid character in RFT 
Bit 4: RESETPL flag for TERM test 
Bit 5: Positive response to line bid 

has been received 
Bit 6: Remote 3270 RFT BSC flag 
Bit 7: Reserved 




11K6F) 
Reserved 






JJ2-135(70-87 
BSC ERP CCW 


) BSC ERP CCW Area (3 double-words) 





DATA EVENT CONTROL BLOCK (DECB) 








1 | 2 | 3 


0(0) 


Completion Code 


Reserved for DOS/BTAM internal use 

(See explanantion of bit 6 of the flag byte) 


4( 4) 


Opfype Qualifier 
bits 


Optype Code 


Length 


8( 8) 


Response Informa- 
tion Byte 


DTFBT Address 


12(0C) 


Mode Byte 


Input/Output Address 


16(10) 


Sense Byte 


Sense byte for 
Diagnostic Read/ 
Write 


Residual Count 


20(14) 


Command Code 


List Address or Entry Address 


24(18) 


Flag byte 


Relative Line 
Number 


Response to 
Addressing Field 


Response to 
and/or VRC 


LRC 


28(1 C) 


TP Code 


Error Information 


Status Bytes 


32(20) 


Reserved 


Addressing Pointer 


36(24) 


Reserved 


Polling or Scanning Pointer 


40(28) 


Flag Bytes for 
extended DECB 


Reserved 


Auxlength 


44(2C) 


Reserved 


Auxarea Address 



Note: The first four (4) bytes of the DECB are called the Event Control Block 

(ECB). The last eight (8) bytes of the DECB are called the DECB extension. 

DECB Explanation 



Byte( s ) 


Description 




Meaning 


Source 


(0) 


X'00' 


Operation in progress 


Maintained by IJLCPGX 


Completion 


X'7F' 


Normal completion 


and IJLBTIH 


Code 


X'41' 


I/O error 






X'44' 


Terminal ID non-comparison 






X'48' 


HALT I/O requested and 
completed 






X'50' 


Contention (BSC or WTTA) 






X'51' 


End-of-file condition 






X'52' 


Wrong length record 






X'54' 


Non-productive operation 






X'58' 


Cancel condition detected 






X'60' 


Wrong ACK-i received 
(i=0or 1) 






X'61' 


WACK received or RVI re- 
ceived in response to selec- 
tion on a multipoint line 






X'62' 


ENQ received in response 
to ENQ 






X'64' 


Unreliable device buffer 
contents 





DATA EVENT CONTROL BLOCK (DECB) • (. . . .Cont'd) 



B y fe( s ) 


Description 


Meaning 


Source 


1-3 (1-3) 

Reserved 


Reserved for DOS/BTAM internal use 
(See explanation of bit 6 of the flag 
byte) 




1 (4) 

Optype Quali- 
fier bits 


Flags are set according to the type 

of operation 

Bit Configuration Meaning 


Set by READ, WRITE and 
CONTROL 


B'10000000' Initial optype 
B'0 1000000' Reset optype 
B'00100000' 2260 local lock 

operation 
B'00010000' Conversational flag 
B'00010000' Skip buffer check 

flag (local 3270 for 

RFT) 
B '0000 1 000 ' Start-stop; Auto 

Poll used in current 

operation 
B'00000100' Entry 'S' 
B '00000010' Area 'S' 
B '0000000 1' Length 'S' 


1 (5) 

Optype Code 
(See DTFBT 
Table) 


Operation type code of the last exe- 
cuted I/O macro instruction 


Set by READ, WRITE and 
CONTROL 


6-7 (6-7) 
Length 


The amount of data to be transmitted 
or received 


Length operand of READ 
or WRITE macro instruct. 


1 (8) 
Response 
information 
byte 


Bit Configuration Meaning 




B '000000 10' An RVI has been 

received in respon- 
se to selection 


9-11 (09-OB) 
DTFBT Address 


Specifies the line group 


Operand of READ,WRITE 
or CONTROL 


12 (OC) 
Mode byte 


Used for Set Mode 


Set by IJLCPGX 


13-15 (OD-OF) 

Input/Output 

Address 




Area operand of READ, 
WRITE or CONTROL 


J6 (10) 
Sense byte 


Bit Configuration Meaning 

B'10000000' Corrmand reject 
B '01000000' Intervention req'd 
B'00100000' Bus-out check 
B'00010000' Equipment check 
B'00001000' Data check 
B'00000100' Overrun or, for 

local 3270, unit 

specify 


Stored by IJLBTIH when 
an unit check has occurred 
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Byte(s) 


Description 


Meaning 


Source 


16(10) 
(Continued) 


Bit Configuration Meaning 

B'00000010' Lost data or, for 
local 3270, con- 
trol check. 

B'00000001 ' Time out or, for 

local 3270, opera- 
tion check 




1Z (ii.) 

Sense byte for 

diagnostic 

READ/WRITE 






18-19(12-13) 
Residual count 


The remaining amount of data which 
was not transmitted 


Stored by IJLBTIH from 
the CCB and CSW 


20 (14) 

Command 

code 


Contains the command code 


Stored by IJLBTIH when 
completion has occurred 


21-23(15-17) 
Entry Address 


Address of terminal list entry 


Initialized from entry 
operand of READ or 
WRITE; maintained by 
IJLBTIH 


24(18) 
Flag byte 


Flag set to determine the type of 

operation 

Bit Configuration Meaning 

B'10000000' PCI occurrence 
B'OIOOOOOO' EOT received 

(BSC or WTTA) 
B'00100000' DLE EOT recei- 
ved (BSC) orWRU 
(WTTA) 
B'000 10000' Stop flag 
B'00010000' Error status mes- 
sage received 
(BSC) 
B'00001000' Enable flag 
B'00000100' Indicates read 

buffers on a con- 
versational WRITE 
B'00000010' Indicates ECB 

bytes 1, 2 and 3 
contain address of 
first unre leased 
buffer not used at 
completion of a 
READ with area 'S 
B '0000000 1' Terminal test 
operation 


Set by IJLCPGX 
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Byte(s) 


Description 


Meaning 


Source 


25(19) 
Relative line 
number 


Position of line entry in list 


From macro instruction 
operand 


26 (1A) 
Response to 
Addressing 


Space reserved for response to add- 
ressing 


Channel program reads 
into this field 


27 (IB) 
Read response 
to redundancy 
check 






28 (1C) 
TP Code 


TP code of last command 


Maintained by IJLBTIH 
and IJLCPGX 


29(1D) 

Error Informa- 
tion 


ERP information 

Bit Configuration Meaning 

B'01000000' Should-not-occur 
error 

B'OO 100000' Error in ERP 

B'OOOIOOOO' Diagnostic WRITE 
READ failed 

B'00000010' ENQ received in 
text (BSC) 

B'00000001' NAK response to 
text (BSC) 
NAK or ID-NAK 
response to ID- 
ENQ (BSC) 


Set by IJLBTIH 


30-3K1E-1F) 
Status bytes 


Bytes are set when an event occurs 


Set by IJLBTIH from the 
CSW 


32 (20) 
Reserved 






33-35 (21-23) 

Addressing 

Pointer 


Address of terminal being addressed 


Set by IJLCPGX 


36 (24) 
Reserved 






37-39 (25-27) 
Polling or 
Scanning poin- 
ter 


Address of terminal being polled or 
scanned 


Set by IJLCPGX 


40 (28) 
DECB extension 
flag byte 


Flags are set according to the type 
of operation using the DECB exten- 

Bit Configuration Meaning 
B' 10000000' Auxarea 'S' 


READ/WRITE 
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Byte(s) 


Description 


Meaning 


Source 


41 (29) 
Reserved 






42-43 (2A-2B) 
Auxlength 


The amount of data to be transmitted 
or received by operations using the 
DECB extension 


READ/WRITE 


44 (2C) 
Reserved 






45-47(2D-2F) 
Auxarea 


Address of data to be transmitted or 
input area for operations using the 
DECB extension 


READ/WRITE 
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